Compare commits
	
		
			35 Commits
		
	
	
		
			qemu-2.1.1
			...
			release_0_
		
	
	| Author | SHA1 | Date | |
|---|---|---|---|
| 
						 | 
					d35381c874 | ||
| 
						 | 
					7648bb760d | ||
| 
						 | 
					ebb7184720 | ||
| 
						 | 
					7712c5850e | ||
| 
						 | 
					3f546bd0b1 | ||
| 
						 | 
					00614a4cb4 | ||
| 
						 | 
					7c14db42cb | ||
| 
						 | 
					e58843d0f1 | ||
| 
						 | 
					0e39d3f89b | ||
| 
						 | 
					5389a9df53 | ||
| 
						 | 
					21fd832512 | ||
| 
						 | 
					15d4afd55b | ||
| 
						 | 
					3df962a30d | ||
| 
						 | 
					4827c90cef | ||
| 
						 | 
					0f56231dce | ||
| 
						 | 
					523faf1b92 | ||
| 
						 | 
					414c078104 | ||
| 
						 | 
					9cecf0f570 | ||
| 
						 | 
					4ca9f3dd71 | ||
| 
						 | 
					f902c4192e | ||
| 
						 | 
					b96a313d3d | ||
| 
						 | 
					d9aa1fce5a | ||
| 
						 | 
					8a11f5ff08 | ||
| 
						 | 
					b786b7ccbd | ||
| 
						 | 
					d3be2b2f71 | ||
| 
						 | 
					e36fb2a3a2 | ||
| 
						 | 
					4978045781 | ||
| 
						 | 
					cb5745c529 | ||
| 
						 | 
					295b492cfa | ||
| 
						 | 
					af8222c0f8 | ||
| 
						 | 
					249139f4e6 | ||
| 
						 | 
					8ae0978ed5 | ||
| 
						 | 
					c0024a8257 | ||
| 
						 | 
					e9af78a859 | ||
| 
						 | 
					25c4fde177 | 
							
								
								
									
										7
									
								
								.exrc
									
									
									
									
									
								
							
							
						
						
									
										7
									
								
								.exrc
									
									
									
									
									
								
							@@ -1,7 +0,0 @@
 | 
			
		||||
"VIM settings to match QEMU coding style.  They are activated by adding the
 | 
			
		||||
"following settings (without the " symbol) as last two lines in $HOME/.vimrc:
 | 
			
		||||
"set secure
 | 
			
		||||
"set exrc
 | 
			
		||||
set expandtab
 | 
			
		||||
set shiftwidth=4
 | 
			
		||||
set smarttab
 | 
			
		||||
							
								
								
									
										115
									
								
								.gitignore
									
									
									
									
										vendored
									
									
								
							
							
						
						
									
										115
									
								
								.gitignore
									
									
									
									
										vendored
									
									
								
							@@ -1,107 +1,38 @@
 | 
			
		||||
/config-devices.*
 | 
			
		||||
/config-all-devices.*
 | 
			
		||||
/config-all-disas.*
 | 
			
		||||
/config-host.*
 | 
			
		||||
/config-target.*
 | 
			
		||||
/config.status
 | 
			
		||||
/config-temp
 | 
			
		||||
/trace/generated-tracers.h
 | 
			
		||||
/trace/generated-tracers.c
 | 
			
		||||
/trace/generated-tracers-dtrace.h
 | 
			
		||||
/trace/generated-tracers.dtrace
 | 
			
		||||
/trace/generated-events.h
 | 
			
		||||
/trace/generated-events.c
 | 
			
		||||
/trace/generated-ust-provider.h
 | 
			
		||||
/trace/generated-ust.c
 | 
			
		||||
/libcacard/trace/generated-tracers.c
 | 
			
		||||
*-timestamp
 | 
			
		||||
/*-softmmu
 | 
			
		||||
/*-darwin-user
 | 
			
		||||
/*-linux-user
 | 
			
		||||
/*-bsd-user
 | 
			
		||||
/libdis*
 | 
			
		||||
/libuser
 | 
			
		||||
/linux-headers/asm
 | 
			
		||||
/qga/qapi-generated
 | 
			
		||||
/qapi-generated
 | 
			
		||||
/qapi-types.[ch]
 | 
			
		||||
/qapi-visit.[ch]
 | 
			
		||||
/qapi-event.[ch]
 | 
			
		||||
/qmp-commands.h
 | 
			
		||||
/qmp-marshal.c
 | 
			
		||||
/qemu-doc.html
 | 
			
		||||
/qemu-tech.html
 | 
			
		||||
/qemu-doc.info
 | 
			
		||||
/qemu-tech.info
 | 
			
		||||
/qemu.1
 | 
			
		||||
/qemu.pod
 | 
			
		||||
/qemu-img.1
 | 
			
		||||
/qemu-img.pod
 | 
			
		||||
/qemu-img
 | 
			
		||||
/qemu-nbd
 | 
			
		||||
/qemu-nbd.8
 | 
			
		||||
/qemu-nbd.pod
 | 
			
		||||
/qemu-options.def
 | 
			
		||||
/qemu-options.texi
 | 
			
		||||
/qemu-img-cmds.texi
 | 
			
		||||
/qemu-img-cmds.h
 | 
			
		||||
/qemu-io
 | 
			
		||||
/qemu-ga
 | 
			
		||||
/qemu-bridge-helper
 | 
			
		||||
/qemu-monitor.texi
 | 
			
		||||
/qmp-commands.txt
 | 
			
		||||
/vscclient
 | 
			
		||||
/fsdev/virtfs-proxy-helper
 | 
			
		||||
/fsdev/virtfs-proxy-helper.1
 | 
			
		||||
/fsdev/virtfs-proxy-helper.pod
 | 
			
		||||
config-host.*
 | 
			
		||||
i386
 | 
			
		||||
*-softmmu
 | 
			
		||||
*-darwin-user
 | 
			
		||||
*-linux-user
 | 
			
		||||
*-bsd-user
 | 
			
		||||
qemu-doc.html
 | 
			
		||||
qemu-tech.html
 | 
			
		||||
qemu-doc.info
 | 
			
		||||
qemu-tech.info
 | 
			
		||||
qemu.1
 | 
			
		||||
qemu.pod
 | 
			
		||||
qemu-img.1
 | 
			
		||||
qemu-img.pod
 | 
			
		||||
qemu-img
 | 
			
		||||
qemu-nbd
 | 
			
		||||
qemu-nbd.8
 | 
			
		||||
qemu-nbd.pod
 | 
			
		||||
.gdbinit
 | 
			
		||||
*.a
 | 
			
		||||
*.aux
 | 
			
		||||
*.cp
 | 
			
		||||
*.dvi
 | 
			
		||||
*.exe
 | 
			
		||||
*.dll
 | 
			
		||||
*.so
 | 
			
		||||
*.mo
 | 
			
		||||
*.fn
 | 
			
		||||
*.ky
 | 
			
		||||
*.log
 | 
			
		||||
*.pdf
 | 
			
		||||
*.cps
 | 
			
		||||
*.fns
 | 
			
		||||
*.kys
 | 
			
		||||
*.pg
 | 
			
		||||
*.pyc
 | 
			
		||||
*.toc
 | 
			
		||||
*.tp
 | 
			
		||||
*.vr
 | 
			
		||||
*.d
 | 
			
		||||
!/scripts/qemu-guest-agent/fsfreeze-hook.d
 | 
			
		||||
*.o
 | 
			
		||||
*.lo
 | 
			
		||||
*.la
 | 
			
		||||
*.pc
 | 
			
		||||
.libs
 | 
			
		||||
.sdk
 | 
			
		||||
*.gcda
 | 
			
		||||
*.gcno
 | 
			
		||||
/pc-bios/bios-pq/status
 | 
			
		||||
/pc-bios/vgabios-pq/status
 | 
			
		||||
/pc-bios/optionrom/linuxboot.asm
 | 
			
		||||
/pc-bios/optionrom/linuxboot.bin
 | 
			
		||||
/pc-bios/optionrom/linuxboot.raw
 | 
			
		||||
/pc-bios/optionrom/linuxboot.img
 | 
			
		||||
/pc-bios/optionrom/multiboot.asm
 | 
			
		||||
/pc-bios/optionrom/multiboot.bin
 | 
			
		||||
/pc-bios/optionrom/multiboot.raw
 | 
			
		||||
/pc-bios/optionrom/multiboot.img
 | 
			
		||||
/pc-bios/optionrom/kvmvapic.asm
 | 
			
		||||
/pc-bios/optionrom/kvmvapic.bin
 | 
			
		||||
/pc-bios/optionrom/kvmvapic.raw
 | 
			
		||||
/pc-bios/optionrom/kvmvapic.img
 | 
			
		||||
/pc-bios/s390-ccw/s390-ccw.elf
 | 
			
		||||
/pc-bios/s390-ccw/s390-ccw.img
 | 
			
		||||
.pc
 | 
			
		||||
patches
 | 
			
		||||
pc-bios/bios-pq/status
 | 
			
		||||
pc-bios/vgabios-pq/status
 | 
			
		||||
.stgit-*
 | 
			
		||||
cscope.*
 | 
			
		||||
tags
 | 
			
		||||
TAGS
 | 
			
		||||
*~
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										33
									
								
								.gitmodules
									
									
									
									
										vendored
									
									
								
							
							
						
						
									
										33
									
								
								.gitmodules
									
									
									
									
										vendored
									
									
								
							@@ -1,33 +0,0 @@
 | 
			
		||||
[submodule "roms/vgabios"]
 | 
			
		||||
	path = roms/vgabios
 | 
			
		||||
	url = git://git.qemu-project.org/vgabios.git/
 | 
			
		||||
[submodule "roms/seabios"]
 | 
			
		||||
	path = roms/seabios
 | 
			
		||||
	url = git://git.qemu-project.org/seabios.git/
 | 
			
		||||
[submodule "roms/SLOF"]
 | 
			
		||||
	path = roms/SLOF
 | 
			
		||||
	url = git://git.qemu-project.org/SLOF.git
 | 
			
		||||
[submodule "roms/ipxe"]
 | 
			
		||||
	path = roms/ipxe
 | 
			
		||||
	url = git://git.qemu-project.org/ipxe.git
 | 
			
		||||
[submodule "roms/openbios"]
 | 
			
		||||
	path = roms/openbios
 | 
			
		||||
	url = git://git.qemu-project.org/openbios.git
 | 
			
		||||
[submodule "roms/openhackware"]
 | 
			
		||||
	path = roms/openhackware
 | 
			
		||||
	url = git://git.qemu-project.org/openhackware.git
 | 
			
		||||
[submodule "roms/qemu-palcode"]
 | 
			
		||||
	path = roms/qemu-palcode
 | 
			
		||||
	url = git://github.com/rth7680/qemu-palcode.git
 | 
			
		||||
[submodule "roms/sgabios"]
 | 
			
		||||
	path = roms/sgabios
 | 
			
		||||
	url = git://git.qemu-project.org/sgabios.git
 | 
			
		||||
[submodule "pixman"]
 | 
			
		||||
	path = pixman
 | 
			
		||||
	url = git://anongit.freedesktop.org/pixman
 | 
			
		||||
[submodule "dtc"]
 | 
			
		||||
	path = dtc
 | 
			
		||||
	url = git://git.qemu-project.org/dtc.git
 | 
			
		||||
[submodule "roms/u-boot"]
 | 
			
		||||
	path = roms/u-boot
 | 
			
		||||
	url = git://git.qemu-project.org/u-boot.git
 | 
			
		||||
							
								
								
									
										17
									
								
								.mailmap
									
									
									
									
									
								
							
							
						
						
									
										17
									
								
								.mailmap
									
									
									
									
									
								
							@@ -1,17 +0,0 @@
 | 
			
		||||
# This mailmap just translates the weird addresses from the original import into git
 | 
			
		||||
# into proper addresses so that they are counted properly in git shortlog output.
 | 
			
		||||
#
 | 
			
		||||
Andrzej Zaborowski <balrogg@gmail.com> balrog <balrog@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Anthony Liguori <anthony@codemonkey.ws> aliguori <aliguori@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Anthony Liguori <anthony@codemonkey.ws> Anthony Liguori <aliguori@us.ibm.com>
 | 
			
		||||
Aurelien Jarno <aurelien@aurel32.net> aurel32 <aurel32@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Blue Swirl <blauwirbel@gmail.com> blueswir1 <blueswir1@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Edgar E. Iglesias <edgar.iglesias@gmail.com> edgar_igl <edgar_igl@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Fabrice Bellard <fabrice@bellard.org> bellard <bellard@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Jocelyn Mayer <l_indien@magic.fr> j_mayer <j_mayer@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Paul Brook <paul@codesourcery.com> pbrook <pbrook@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
Thiemo Seufer <ths@networkno.de> ths <ths@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
malc <av1474@comtv.ru> malc <malc@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
# There is also a:
 | 
			
		||||
#    (no author) <(no author)@c046a42c-6fe2-441c-8c8c-71466251a162>
 | 
			
		||||
# for the cvs2svn initialization commit e63c3dc74bf.
 | 
			
		||||
							
								
								
									
										81
									
								
								.travis.yml
									
									
									
									
									
								
							
							
						
						
									
										81
									
								
								.travis.yml
									
									
									
									
									
								
							@@ -1,81 +0,0 @@
 | 
			
		||||
language: c
 | 
			
		||||
python:
 | 
			
		||||
  - "2.4"
 | 
			
		||||
compiler:
 | 
			
		||||
  - gcc
 | 
			
		||||
  - clang
 | 
			
		||||
notifications:
 | 
			
		||||
  irc:
 | 
			
		||||
    channels:
 | 
			
		||||
      - "irc.oftc.net#qemu"
 | 
			
		||||
    on_success: change
 | 
			
		||||
    on_failure: always
 | 
			
		||||
env:
 | 
			
		||||
  global:
 | 
			
		||||
    - TEST_CMD="make check"
 | 
			
		||||
    - EXTRA_CONFIG=""
 | 
			
		||||
    # Development packages, EXTRA_PKGS saved for additional builds
 | 
			
		||||
    - CORE_PKGS="libusb-1.0-0-dev libiscsi-dev librados-dev libncurses5-dev"
 | 
			
		||||
    - NET_PKGS="libseccomp-dev libgnutls-dev libssh2-1-dev  libspice-server-dev libspice-protocol-dev libnss3-dev"
 | 
			
		||||
    - GUI_PKGS="libgtk-3-dev libvte-2.90-dev libsdl1.2-dev libpng12-dev libpixman-1-dev"
 | 
			
		||||
    - EXTRA_PKGS=""
 | 
			
		||||
  matrix:
 | 
			
		||||
    - TARGETS=alpha-softmmu,alpha-linux-user
 | 
			
		||||
    - TARGETS=arm-softmmu,arm-linux-user
 | 
			
		||||
    - TARGETS=aarch64-softmmu,aarch64-linux-user
 | 
			
		||||
    - TARGETS=cris-softmmu
 | 
			
		||||
    - TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
    - TARGETS=lm32-softmmu
 | 
			
		||||
    - TARGETS=m68k-softmmu
 | 
			
		||||
    - TARGETS=microblaze-softmmu,microblazeel-softmmu
 | 
			
		||||
    - TARGETS=mips-softmmu,mips64-softmmu,mips64el-softmmu,mipsel-softmmu
 | 
			
		||||
    - TARGETS=moxie-softmmu
 | 
			
		||||
    - TARGETS=or32-softmmu,
 | 
			
		||||
    - TARGETS=ppc-softmmu,ppc64-softmmu,ppcemb-softmmu
 | 
			
		||||
    - TARGETS=s390x-softmmu
 | 
			
		||||
    - TARGETS=sh4-softmmu,sh4eb-softmmu
 | 
			
		||||
    - TARGETS=sparc-softmmu,sparc64-softmmu
 | 
			
		||||
    - TARGETS=unicore32-softmmu
 | 
			
		||||
    - TARGETS=xtensa-softmmu,xtensaeb-softmmu
 | 
			
		||||
before_install:
 | 
			
		||||
  - git submodule update --init --recursive
 | 
			
		||||
  - sudo apt-get update -qq
 | 
			
		||||
  - sudo apt-get install -qq ${CORE_PKGS} ${NET_PKGS} ${GUI_PKGS} ${EXTRA_PKGS}
 | 
			
		||||
script: "./configure --target-list=${TARGETS} ${EXTRA_CONFIG} && make && ${TEST_CMD}"
 | 
			
		||||
matrix:
 | 
			
		||||
  # We manually include a number of additional build for non-standard bits
 | 
			
		||||
  include:
 | 
			
		||||
    # Debug related options
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_CONFIG="--enable-debug"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_CONFIG="--enable-debug --enable-tcg-interpreter"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    # All the extra -dev packages
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_PKGS="libaio-dev libcap-ng-dev libattr1-dev libbrlapi-dev uuid-dev libusb-1.0.0-dev"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    # Currently configure doesn't force --disable-pie
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_CONFIG="--enable-gprof --enable-gcov --disable-pie"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_PKGS="sparse"
 | 
			
		||||
           EXTRA_CONFIG="--enable-sparse"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    # All the trace backends (apart from dtrace)
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_CONFIG="--enable-trace-backends=stderr"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_CONFIG="--enable-trace-backends=simple"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
           EXTRA_CONFIG="--enable-trace-backends=ftrace"
 | 
			
		||||
           TEST_CMD=""
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
    - env: TARGETS=i386-softmmu,x86_64-softmmu
 | 
			
		||||
          EXTRA_PKGS="liblttng-ust-dev liburcu-dev"
 | 
			
		||||
          EXTRA_CONFIG="--enable-trace-backends=ust"
 | 
			
		||||
      compiler: gcc
 | 
			
		||||
							
								
								
									
										93
									
								
								CODING_STYLE
									
									
									
									
									
								
							
							
						
						
									
										93
									
								
								CODING_STYLE
									
									
									
									
									
								
							@@ -1,93 +0,0 @@
 | 
			
		||||
QEMU Coding Style
 | 
			
		||||
=================
 | 
			
		||||
 | 
			
		||||
Please use the script checkpatch.pl in the scripts directory to check
 | 
			
		||||
patches before submitting.
 | 
			
		||||
 | 
			
		||||
1. Whitespace
 | 
			
		||||
 | 
			
		||||
Of course, the most important aspect in any coding style is whitespace.
 | 
			
		||||
Crusty old coders who have trouble spotting the glasses on their noses
 | 
			
		||||
can tell the difference between a tab and eight spaces from a distance
 | 
			
		||||
of approximately fifteen parsecs.  Many a flamewar have been fought and
 | 
			
		||||
lost on this issue.
 | 
			
		||||
 | 
			
		||||
QEMU indents are four spaces.  Tabs are never used, except in Makefiles
 | 
			
		||||
where they have been irreversibly coded into the syntax.
 | 
			
		||||
Spaces of course are superior to tabs because:
 | 
			
		||||
 | 
			
		||||
 - You have just one way to specify whitespace, not two.  Ambiguity breeds
 | 
			
		||||
   mistakes.
 | 
			
		||||
 - The confusion surrounding 'use tabs to indent, spaces to justify' is gone.
 | 
			
		||||
 - Tab indents push your code to the right, making your screen seriously
 | 
			
		||||
   unbalanced.
 | 
			
		||||
 - Tabs will be rendered incorrectly on editors who are misconfigured not
 | 
			
		||||
   to use tab stops of eight positions.
 | 
			
		||||
 - Tabs are rendered badly in patches, causing off-by-one errors in almost
 | 
			
		||||
   every line.
 | 
			
		||||
 - It is the QEMU coding style.
 | 
			
		||||
 | 
			
		||||
Do not leave whitespace dangling off the ends of lines.
 | 
			
		||||
 | 
			
		||||
2. Line width
 | 
			
		||||
 | 
			
		||||
Lines are 80 characters; not longer.
 | 
			
		||||
 | 
			
		||||
Rationale:
 | 
			
		||||
 - Some people like to tile their 24" screens with a 6x4 matrix of 80x24
 | 
			
		||||
   xterms and use vi in all of them.  The best way to punish them is to
 | 
			
		||||
   let them keep doing it.
 | 
			
		||||
 - Code and especially patches is much more readable if limited to a sane
 | 
			
		||||
   line length.  Eighty is traditional.
 | 
			
		||||
 - It is the QEMU coding style.
 | 
			
		||||
 | 
			
		||||
3. Naming
 | 
			
		||||
 | 
			
		||||
Variables are lower_case_with_underscores; easy to type and read.  Structured
 | 
			
		||||
type names are in CamelCase; harder to type but standing out.  Enum type
 | 
			
		||||
names and function type names should also be in CamelCase.  Scalar type
 | 
			
		||||
names are lower_case_with_underscores_ending_with_a_t, like the POSIX
 | 
			
		||||
uint64_t and family.  Note that this last convention contradicts POSIX
 | 
			
		||||
and is therefore likely to be changed.
 | 
			
		||||
 | 
			
		||||
When wrapping standard library functions, use the prefix qemu_ to alert
 | 
			
		||||
readers that they are seeing a wrapped version; otherwise avoid this prefix.
 | 
			
		||||
 | 
			
		||||
4. Block structure
 | 
			
		||||
 | 
			
		||||
Every indented statement is braced; even if the block contains just one
 | 
			
		||||
statement.  The opening brace is on the line that contains the control
 | 
			
		||||
flow statement that introduces the new block; the closing brace is on the
 | 
			
		||||
same line as the else keyword, or on a line by itself if there is no else
 | 
			
		||||
keyword.  Example:
 | 
			
		||||
 | 
			
		||||
    if (a == 5) {
 | 
			
		||||
        printf("a was 5.\n");
 | 
			
		||||
    } else if (a == 6) {
 | 
			
		||||
        printf("a was 6.\n");
 | 
			
		||||
    } else {
 | 
			
		||||
        printf("a was something else entirely.\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
Note that 'else if' is considered a single statement; otherwise a long if/
 | 
			
		||||
else if/else if/.../else sequence would need an indent for every else
 | 
			
		||||
statement.
 | 
			
		||||
 | 
			
		||||
An exception is the opening brace for a function; for reasons of tradition
 | 
			
		||||
and clarity it comes on a line by itself:
 | 
			
		||||
 | 
			
		||||
    void a_function(void)
 | 
			
		||||
    {
 | 
			
		||||
        do_something();
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
Rationale: a consistent (except for functions...) bracing style reduces
 | 
			
		||||
ambiguity and avoids needless churn when lines are added or removed.
 | 
			
		||||
Furthermore, it is the QEMU coding style.
 | 
			
		||||
 | 
			
		||||
5. Declarations
 | 
			
		||||
 | 
			
		||||
Mixed declarations (interleaving statements and declarations within blocks)
 | 
			
		||||
are not allowed; declarations should be at the beginning of blocks.  In other
 | 
			
		||||
words, the code should not generate warnings if using GCC's
 | 
			
		||||
-Wdeclaration-after-statement option.
 | 
			
		||||
							
								
								
									
										103
									
								
								Changelog
									
									
									
									
									
								
							
							
						
						
									
										103
									
								
								Changelog
									
									
									
									
									
								
							@@ -1,97 +1,10 @@
 | 
			
		||||
This file documents changes for QEMU releases 0.12 and earlier.
 | 
			
		||||
For changelog information for later releases, see
 | 
			
		||||
http://wiki.qemu-project.org/ChangeLog or look at the git history for
 | 
			
		||||
more detailed information.
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
version 0.12.0:
 | 
			
		||||
 | 
			
		||||
  - Update to SeaBIOS 0.5.0
 | 
			
		||||
  - e1000: fix device link status in Linux (Anthony Liguori)
 | 
			
		||||
  - monitor: fix QMP for balloon command (Luiz Capitulino)
 | 
			
		||||
  - QMP: Return an empty dict by default (Luiz Capitulino)
 | 
			
		||||
  - QMP: Only handle converted commands (Luiz Capitulino)
 | 
			
		||||
  - pci: support PCI based option rom loading (Gerd Hoffman/Anthony Liguori)
 | 
			
		||||
  - Fix backcompat for hotplug of SCSI controllers (Daniel P. Berrange)
 | 
			
		||||
  - fdc: fix migration from 0.11 (Juan Quintela)
 | 
			
		||||
  - vmware-vga: fix segv on cursor resize. (Dave Airlie)
 | 
			
		||||
  - vmware-vga: various fixes (Dave Airlie/Anthony Liguori)
 | 
			
		||||
  - qdev: improve property error reporting. (Gerd Hoffmann)
 | 
			
		||||
  - fix vga names in default_list (Gerd Hoffmann)
 | 
			
		||||
  - usb-host: check mon before using it. (Gerd Hoffmann)
 | 
			
		||||
  - usb-net: use qdev for -usbdevice (Gerd Hoffmann)
 | 
			
		||||
  - monitor: Catch printing to non-existent monitor (Luiz Capitulino)
 | 
			
		||||
  - Avoid permanently disabled QEMU monitor when UNIX migration fails (Daniel P. Berrange)
 | 
			
		||||
  - Fix loading of ELF multiboot kernels (Kevin Wolf)
 | 
			
		||||
  - qemu-io: Fix memory leak (Kevin Wolf)
 | 
			
		||||
  - Fix thinko in linuxboot.S (Paolo Bonzini)
 | 
			
		||||
  - target-i386: Fix evaluation of DR7 register (Jan Kiszka)
 | 
			
		||||
  - vnc: hextile: do not generate ForegroundSpecified and SubrectsColoured tiles (Anthony Liguori)
 | 
			
		||||
  - S390: Bail out without KVM (Alexander Graf)
 | 
			
		||||
  - S390: Don't tell guest we're updating config space (Alexander Graf)
 | 
			
		||||
  - target-s390: Fail on unknown instructions (Alexander Graf)
 | 
			
		||||
  - osdep: Fix runtime failure on older Linux kernels (Andre Przywara)
 | 
			
		||||
  - Fix a make -j race (Juergen Lock)
 | 
			
		||||
  - target-alpha: Fix generic ctz64. (Richard Henderson)
 | 
			
		||||
  - s390: Fix buggy assignment (Stefan Weil)
 | 
			
		||||
  - target-mips: fix user-mode emulation startup (Nathan Froyd)
 | 
			
		||||
  - target-i386: Update CPUID feature set for TCG (Andre Przywara)
 | 
			
		||||
  - s390: fix build on 32 bit host (Michael S. Tsirkin)
 | 
			
		||||
	
 | 
			
		||||
version 0.12.0-rc2:
 | 
			
		||||
 | 
			
		||||
  - v2: properly save kvm system time msr registers (Glauber Costa)
 | 
			
		||||
  - convert more monitor commands to qmp (Luiz Capitulino)
 | 
			
		||||
  - vnc: fix capslock tracking logic. (Gerd Hoffmann)
 | 
			
		||||
  - QemuOpts: allow larger option values. (Gerd Hoffmann)
 | 
			
		||||
  - scsi: fix drive hotplug. (Gerd Hoffmann)
 | 
			
		||||
  - pci: don't hw_error() when no slot is available. (Gerd Hoffmann)
 | 
			
		||||
  - pci: don't abort() when trying to hotplug with acpi off. (Gerd Hoffmann)
 | 
			
		||||
  - allow default devices to be implemented in config file (Gerd Hoffman)
 | 
			
		||||
  - vc: colorize chardev title line with blue background. (Gerd Hoffmann)
 | 
			
		||||
  - chardev: make chardevs specified in config file work. (Gerd Hoffmann)
 | 
			
		||||
  - qdev: also match bus name for global properties (Gerd Hoffmann)
 | 
			
		||||
  - qdev: add command line option to set global defaults for properties. (Gerd Hoffmann)
 | 
			
		||||
  - kvm: x86: Save/restore exception_index (Jan Kiszka)
 | 
			
		||||
  - qdev: Replace device names containing whitespace (Markus Armbruster)
 | 
			
		||||
  - fix rtc-td-hack on host without high-res timers (Gleb Natapov)
 | 
			
		||||
  - virtio: verify features on load (Michael S. Tsirkin)
 | 
			
		||||
  - vmware_vga: add rom file so that it boots. (Dave Airlie)
 | 
			
		||||
  - Do not abort on qemu_malloc(0) in production builds (Anthony Liguori)
 | 
			
		||||
  - Fix ARM userspace strex implementation. (Paul Brook)
 | 
			
		||||
  - qemu: delete rule target on error (Michael S. Tsirkin)
 | 
			
		||||
  - QMP: add human-readable description to error response (Markus Armbruster)
 | 
			
		||||
  - convert more monitor commands to QError (Markus Armbruster)
 | 
			
		||||
  - monitor: Fix double-prompt after "change vnc passwd BLA" (Markus Armbruster)
 | 
			
		||||
  - monitor: do_cont(): Don't ask for passwords (Luiz Capitulino)
 | 
			
		||||
  - monitor: Introduce 'block_passwd' command (Luiz Capitulino)
 | 
			
		||||
  - pci: interrupt disable bit support (Michael S. Tsirkin)
 | 
			
		||||
  - pci: interrupt status bit implementation (Michael S. Tsirkin)
 | 
			
		||||
  - pci: prepare irq code for interrupt state (Michael S. Tsirkin)
 | 
			
		||||
  - msix: function mask support (Michael S. Tsirkin)
 | 
			
		||||
  - msix: macro rename for function mask support (Michael S. Tsirkin)
 | 
			
		||||
  - cpuid: Fix multicore setup on Intel (Andre Przywara)
 | 
			
		||||
  - kvm: x86: Fix initial kvm_has_msr_star (Jan Kiszka)
 | 
			
		||||
  - Update OpenBIOS images to r640 (Aurelien Jarno)	
 | 
			
		||||
 | 
			
		||||
version 0.10.2:
 | 
			
		||||
 | 
			
		||||
  - fix savevm/loadvm (Anthony Liguori)
 | 
			
		||||
  - live migration: fix dirty tracking windows (Glauber Costa)
 | 
			
		||||
  - live migration: improve error propagation (Glauber Costa)
 | 
			
		||||
  - qcow2: fix image creation for > ~2TB images (Chris Wright)
 | 
			
		||||
  - hotplug: fix error handling for if= parameter (Eduardo Habkost)
 | 
			
		||||
  - qcow2: fix data corruption (Nolan Leake)
 | 
			
		||||
  - virtio: fix guest oops with 2.6.25 kernels (Rusty Russell)
 | 
			
		||||
  - SH4: add support for -kernel (Takashi Yoshii, Aurelien Jarno)
 | 
			
		||||
  - hotplug: fix closing of char devices (Jan Kiszka)
 | 
			
		||||
  - hotplug: remove incorrect check for device name (Eduardo Habkost)
 | 
			
		||||
  - enable -k on win32 (Herve Poussineau)
 | 
			
		||||
  - configure: use LANG=C for grep (Andreas Faerber)
 | 
			
		||||
  - fix VGA regression (malc)
 | 
			
		||||
	
 | 
			
		||||
version 0.10.1:
 | 
			
		||||
 | 
			
		||||
  - virtio-net: allow masking of notifications on empty queue (Alex Williamson)
 | 
			
		||||
  - e1000: fix rx descriptor low threshold logic (Alex Willaimson)
 | 
			
		||||
  - x86 tcg: add NULL checks to lsl instruction (Jan Kiszka)
 | 
			
		||||
  - kvm vga: fix screen corruption with -std-vga and Windows (Avi Kivity)
 | 
			
		||||
  - kvm vga: fix screen corruption with Ubuntu installations (Glauber Costa)
 | 
			
		||||
  - virtio-net: check right return size on sg list (Alex Williamson)
 | 
			
		||||
  - Make qemu_announce_self handle holes (live migration after hotplug)
 | 
			
		||||
    (Marcelo Tosatti)
 | 
			
		||||
@@ -386,7 +299,7 @@ version 0.5.3:
 | 
			
		||||
  - support of CD-ROM change
 | 
			
		||||
  - multiple network interface support
 | 
			
		||||
  - initial x86-64 host support (Gwenole Beauchesne)
 | 
			
		||||
  - lret to outer privilege fix (OS/2 install fix)
 | 
			
		||||
  - lret to outer priviledge fix (OS/2 install fix)
 | 
			
		||||
  - task switch fixes (SkyOS boot)
 | 
			
		||||
  - VM save/restore commands
 | 
			
		||||
  - new timer API
 | 
			
		||||
@@ -447,7 +360,7 @@ version 0.5.0:
 | 
			
		||||
  - multi-target build
 | 
			
		||||
  - fixed: no error code in hardware interrupts
 | 
			
		||||
  - fixed: pop ss, mov ss, x and sti disable hardware irqs for the next insn
 | 
			
		||||
  - correct single stepping through string operations
 | 
			
		||||
  - correct single stepping thru string operations
 | 
			
		||||
  - preliminary SPARC target support (Thomas M. Ogrisegg)
 | 
			
		||||
  - tun-fd option (Rusty Russell)
 | 
			
		||||
  - automatic IDE geometry detection
 | 
			
		||||
@@ -531,7 +444,7 @@ version 0.1.5:
 | 
			
		||||
 | 
			
		||||
 - ppc64 support + personality() patch (Rusty Russell)
 | 
			
		||||
 - first Alpha CPU patches (Falk Hueffner)
 | 
			
		||||
 - removed bfd.h dependency
 | 
			
		||||
 - removed bfd.h dependancy
 | 
			
		||||
 - fixed shrd, shld, idivl and divl on PowerPC.
 | 
			
		||||
 - fixed buggy glibc PowerPC rint() function (test-i386 passes now on PowerPC).
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										159
									
								
								HACKING
									
									
									
									
									
								
							
							
						
						
									
										159
									
								
								HACKING
									
									
									
									
									
								
							@@ -1,159 +0,0 @@
 | 
			
		||||
1. Preprocessor
 | 
			
		||||
 | 
			
		||||
For variadic macros, stick with this C99-like syntax:
 | 
			
		||||
 | 
			
		||||
#define DPRINTF(fmt, ...)                                       \
 | 
			
		||||
    do { printf("IRQ: " fmt, ## __VA_ARGS__); } while (0)
 | 
			
		||||
 | 
			
		||||
2. C types
 | 
			
		||||
 | 
			
		||||
It should be common sense to use the right type, but we have collected
 | 
			
		||||
a few useful guidelines here.
 | 
			
		||||
 | 
			
		||||
2.1. Scalars
 | 
			
		||||
 | 
			
		||||
If you're using "int" or "long", odds are good that there's a better type.
 | 
			
		||||
If a variable is counting something, it should be declared with an
 | 
			
		||||
unsigned type.
 | 
			
		||||
 | 
			
		||||
If it's host memory-size related, size_t should be a good choice (use
 | 
			
		||||
ssize_t only if required). Guest RAM memory offsets must use ram_addr_t,
 | 
			
		||||
but only for RAM, it may not cover whole guest address space.
 | 
			
		||||
 | 
			
		||||
If it's file-size related, use off_t.
 | 
			
		||||
If it's file-offset related (i.e., signed), use off_t.
 | 
			
		||||
If it's just counting small numbers use "unsigned int";
 | 
			
		||||
(on all but oddball embedded systems, you can assume that that
 | 
			
		||||
type is at least four bytes wide).
 | 
			
		||||
 | 
			
		||||
In the event that you require a specific width, use a standard type
 | 
			
		||||
like int32_t, uint32_t, uint64_t, etc.  The specific types are
 | 
			
		||||
mandatory for VMState fields.
 | 
			
		||||
 | 
			
		||||
Don't use Linux kernel internal types like u32, __u32 or __le32.
 | 
			
		||||
 | 
			
		||||
Use hwaddr for guest physical addresses except pcibus_t
 | 
			
		||||
for PCI addresses.  In addition, ram_addr_t is a QEMU internal address
 | 
			
		||||
space that maps guest RAM physical addresses into an intermediate
 | 
			
		||||
address space that can map to host virtual address spaces.  Generally
 | 
			
		||||
speaking, the size of guest memory can always fit into ram_addr_t but
 | 
			
		||||
it would not be correct to store an actual guest physical address in a
 | 
			
		||||
ram_addr_t.
 | 
			
		||||
 | 
			
		||||
For CPU virtual addresses there are several possible types.
 | 
			
		||||
vaddr is the best type to use to hold a CPU virtual address in
 | 
			
		||||
target-independent code. It is guaranteed to be large enough to hold a
 | 
			
		||||
virtual address for any target, and it does not change size from target
 | 
			
		||||
to target. It is always unsigned.
 | 
			
		||||
target_ulong is a type the size of a virtual address on the CPU; this means
 | 
			
		||||
it may be 32 or 64 bits depending on which target is being built. It should
 | 
			
		||||
therefore be used only in target-specific code, and in some
 | 
			
		||||
performance-critical built-per-target core code such as the TLB code.
 | 
			
		||||
There is also a signed version, target_long.
 | 
			
		||||
abi_ulong is for the *-user targets, and represents a type the size of
 | 
			
		||||
'void *' in that target's ABI. (This may not be the same as the size of a
 | 
			
		||||
full CPU virtual address in the case of target ABIs which use 32 bit pointers
 | 
			
		||||
on 64 bit CPUs, like sparc32plus.) Definitions of structures that must match
 | 
			
		||||
the target's ABI must use this type for anything that on the target is defined
 | 
			
		||||
to be an 'unsigned long' or a pointer type.
 | 
			
		||||
There is also a signed version, abi_long.
 | 
			
		||||
 | 
			
		||||
Of course, take all of the above with a grain of salt.  If you're about
 | 
			
		||||
to use some system interface that requires a type like size_t, pid_t or
 | 
			
		||||
off_t, use matching types for any corresponding variables.
 | 
			
		||||
 | 
			
		||||
Also, if you try to use e.g., "unsigned int" as a type, and that
 | 
			
		||||
conflicts with the signedness of a related variable, sometimes
 | 
			
		||||
it's best just to use the *wrong* type, if "pulling the thread"
 | 
			
		||||
and fixing all related variables would be too invasive.
 | 
			
		||||
 | 
			
		||||
Finally, while using descriptive types is important, be careful not to
 | 
			
		||||
go overboard.  If whatever you're doing causes warnings, or requires
 | 
			
		||||
casts, then reconsider or ask for help.
 | 
			
		||||
 | 
			
		||||
2.2. Pointers
 | 
			
		||||
 | 
			
		||||
Ensure that all of your pointers are "const-correct".
 | 
			
		||||
Unless a pointer is used to modify the pointed-to storage,
 | 
			
		||||
give it the "const" attribute.  That way, the reader knows
 | 
			
		||||
up-front that this is a read-only pointer.  Perhaps more
 | 
			
		||||
importantly, if we're diligent about this, when you see a non-const
 | 
			
		||||
pointer, you're guaranteed that it is used to modify the storage
 | 
			
		||||
it points to, or it is aliased to another pointer that is.
 | 
			
		||||
 | 
			
		||||
2.3. Typedefs
 | 
			
		||||
Typedefs are used to eliminate the redundant 'struct' keyword.
 | 
			
		||||
 | 
			
		||||
2.4. Reserved namespaces in C and POSIX
 | 
			
		||||
Underscore capital, double underscore, and underscore 't' suffixes should be
 | 
			
		||||
avoided.
 | 
			
		||||
 | 
			
		||||
3. Low level memory management
 | 
			
		||||
 | 
			
		||||
Use of the malloc/free/realloc/calloc/valloc/memalign/posix_memalign
 | 
			
		||||
APIs is not allowed in the QEMU codebase. Instead of these routines,
 | 
			
		||||
use the GLib memory allocation routines g_malloc/g_malloc0/g_new/
 | 
			
		||||
g_new0/g_realloc/g_free or QEMU's qemu_memalign/qemu_blockalign/qemu_vfree
 | 
			
		||||
APIs.
 | 
			
		||||
 | 
			
		||||
Please note that g_malloc will exit on allocation failure, so there
 | 
			
		||||
is no need to test for failure (as you would have to with malloc).
 | 
			
		||||
Calling g_malloc with a zero size is valid and will return NULL.
 | 
			
		||||
 | 
			
		||||
Memory allocated by qemu_memalign or qemu_blockalign must be freed with
 | 
			
		||||
qemu_vfree, since breaking this will cause problems on Win32.
 | 
			
		||||
 | 
			
		||||
4. String manipulation
 | 
			
		||||
 | 
			
		||||
Do not use the strncpy function.  As mentioned in the man page, it does *not*
 | 
			
		||||
guarantee a NULL-terminated buffer, which makes it extremely dangerous to use.
 | 
			
		||||
It also zeros trailing destination bytes out to the specified length.  Instead,
 | 
			
		||||
use this similar function when possible, but note its different signature:
 | 
			
		||||
void pstrcpy(char *dest, int dest_buf_size, const char *src)
 | 
			
		||||
 | 
			
		||||
Don't use strcat because it can't check for buffer overflows, but:
 | 
			
		||||
char *pstrcat(char *buf, int buf_size, const char *s)
 | 
			
		||||
 | 
			
		||||
The same limitation exists with sprintf and vsprintf, so use snprintf and
 | 
			
		||||
vsnprintf.
 | 
			
		||||
 | 
			
		||||
QEMU provides other useful string functions:
 | 
			
		||||
int strstart(const char *str, const char *val, const char **ptr)
 | 
			
		||||
int stristart(const char *str, const char *val, const char **ptr)
 | 
			
		||||
int qemu_strnlen(const char *s, int max_len)
 | 
			
		||||
 | 
			
		||||
There are also replacement character processing macros for isxyz and toxyz,
 | 
			
		||||
so instead of e.g. isalnum you should use qemu_isalnum.
 | 
			
		||||
 | 
			
		||||
Because of the memory management rules, you must use g_strdup/g_strndup
 | 
			
		||||
instead of plain strdup/strndup.
 | 
			
		||||
 | 
			
		||||
5. Printf-style functions
 | 
			
		||||
 | 
			
		||||
Whenever you add a new printf-style function, i.e., one with a format
 | 
			
		||||
string argument and following "..." in its prototype, be sure to use
 | 
			
		||||
gcc's printf attribute directive in the prototype.
 | 
			
		||||
 | 
			
		||||
This makes it so gcc's -Wformat and -Wformat-security options can do
 | 
			
		||||
their jobs and cross-check format strings with the number and types
 | 
			
		||||
of arguments.
 | 
			
		||||
 | 
			
		||||
6. C standard, implementation defined and undefined behaviors
 | 
			
		||||
 | 
			
		||||
C code in QEMU should be written to the C99 language specification. A copy
 | 
			
		||||
of the final version of the C99 standard with corrigenda TC1, TC2, and TC3
 | 
			
		||||
included, formatted as a draft, can be downloaded from:
 | 
			
		||||
 http://www.open-std.org/jtc1/sc22/WG14/www/docs/n1256.pdf
 | 
			
		||||
 | 
			
		||||
The C language specification defines regions of undefined behavior and
 | 
			
		||||
implementation defined behavior (to give compiler authors enough leeway to
 | 
			
		||||
produce better code).  In general, code in QEMU should follow the language
 | 
			
		||||
specification and avoid both undefined and implementation defined
 | 
			
		||||
constructs. ("It works fine on the gcc I tested it with" is not a valid
 | 
			
		||||
argument...) However there are a few areas where we allow ourselves to
 | 
			
		||||
assume certain behaviors because in practice all the platforms we care about
 | 
			
		||||
behave in the same way and writing strictly conformant code would be
 | 
			
		||||
painful. These are:
 | 
			
		||||
 * you may assume that integers are 2s complement representation
 | 
			
		||||
 * you may assume that right shift of a signed integer duplicates
 | 
			
		||||
   the sign bit (ie it is an arithmetic shift, not a logical shift)
 | 
			
		||||
							
								
								
									
										17
									
								
								LICENSE
									
									
									
									
									
								
							
							
						
						
									
										17
									
								
								LICENSE
									
									
									
									
									
								
							@@ -1,21 +1,18 @@
 | 
			
		||||
The following points clarify the QEMU license:
 | 
			
		||||
 | 
			
		||||
1) QEMU as a whole is released under the GNU General Public License,
 | 
			
		||||
version 2.
 | 
			
		||||
1) QEMU as a whole is released under the GNU General Public License
 | 
			
		||||
 | 
			
		||||
2) Parts of QEMU have specific licenses which are compatible with the
 | 
			
		||||
GNU General Public License, version 2. Hence each source file contains
 | 
			
		||||
its own licensing information.  Source files with no licensing information
 | 
			
		||||
are released under the GNU General Public License, version 2 or (at your
 | 
			
		||||
option) any later version.
 | 
			
		||||
GNU General Public License. Hence each source file contains its own
 | 
			
		||||
licensing information.
 | 
			
		||||
 | 
			
		||||
As of July 2013, contributions under version 2 of the GNU General Public
 | 
			
		||||
License (and no later version) are only accepted for the following files
 | 
			
		||||
or directories: bsd-user/, linux-user/, hw/misc/vfio.c, hw/xen/xen_pt*.
 | 
			
		||||
In particular, the QEMU virtual CPU core library (libqemu.a) is
 | 
			
		||||
released under the GNU Lesser General Public License. Many hardware
 | 
			
		||||
device emulation sources are released under the BSD license.
 | 
			
		||||
 | 
			
		||||
3) The Tiny Code Generator (TCG) is released under the BSD license
 | 
			
		||||
   (see license headers in files).
 | 
			
		||||
 | 
			
		||||
4) QEMU is a trademark of Fabrice Bellard.
 | 
			
		||||
 | 
			
		||||
Fabrice Bellard and the QEMU team
 | 
			
		||||
Fabrice Bellard.
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										1058
									
								
								MAINTAINERS
									
									
									
									
									
								
							
							
						
						
									
										1058
									
								
								MAINTAINERS
									
									
									
									
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										729
									
								
								Makefile
									
									
									
									
									
								
							
							
						
						
									
										729
									
								
								Makefile
									
									
									
									
									
								
							@@ -1,558 +1,361 @@
 | 
			
		||||
# Makefile for QEMU.
 | 
			
		||||
 | 
			
		||||
# Always point to the root of the build tree (needs GNU make).
 | 
			
		||||
BUILD_DIR=$(CURDIR)
 | 
			
		||||
 | 
			
		||||
# All following code might depend on configuration variables
 | 
			
		||||
ifneq ($(wildcard config-host.mak),)
 | 
			
		||||
# Put the all: rule here so that config-host.mak can contain dependencies.
 | 
			
		||||
all:
 | 
			
		||||
include config-host.mak
 | 
			
		||||
 | 
			
		||||
# Check that we're not trying to do an out-of-tree build from
 | 
			
		||||
# a tree that's been used for an in-tree build.
 | 
			
		||||
ifneq ($(realpath $(SRC_PATH)),$(realpath .))
 | 
			
		||||
ifneq ($(wildcard $(SRC_PATH)/config-host.mak),)
 | 
			
		||||
$(error This is an out of tree build but your source tree ($(SRC_PATH)) \
 | 
			
		||||
seems to have been used for an in-tree build. You can fix this by running \
 | 
			
		||||
"make distclean && rm -rf *-linux-user *-softmmu" in your source tree)
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
CONFIG_SOFTMMU := $(if $(filter %-softmmu,$(TARGET_DIRS)),y)
 | 
			
		||||
CONFIG_USER_ONLY := $(if $(filter %-user,$(TARGET_DIRS)),y)
 | 
			
		||||
CONFIG_ALL=y
 | 
			
		||||
-include config-all-devices.mak
 | 
			
		||||
-include config-all-disas.mak
 | 
			
		||||
 | 
			
		||||
include $(SRC_PATH)/rules.mak
 | 
			
		||||
config-host.mak: $(SRC_PATH)/configure
 | 
			
		||||
	@echo $@ is out-of-date, running configure
 | 
			
		||||
	@# TODO: The next lines include code which supports a smooth
 | 
			
		||||
	@# transition from old configurations without config.status.
 | 
			
		||||
	@# This code can be removed after QEMU 1.7.
 | 
			
		||||
	@if test -x config.status; then \
 | 
			
		||||
	    ./config.status; \
 | 
			
		||||
        else \
 | 
			
		||||
	    sed -n "/.*Configured with/s/[^:]*: //p" $@ | sh; \
 | 
			
		||||
	fi
 | 
			
		||||
else
 | 
			
		||||
config-host.mak:
 | 
			
		||||
ifneq ($(filter-out %clean,$(MAKECMDGOALS)),$(if $(MAKECMDGOALS),,fail))
 | 
			
		||||
	@echo "Please call configure before running make!"
 | 
			
		||||
	@exit 1
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
GENERATED_HEADERS = config-host.h qemu-options.def
 | 
			
		||||
GENERATED_HEADERS += qmp-commands.h qapi-types.h qapi-visit.h qapi-event.h
 | 
			
		||||
GENERATED_SOURCES += qmp-marshal.c qapi-types.c qapi-visit.c qapi-event.c
 | 
			
		||||
 | 
			
		||||
GENERATED_HEADERS += trace/generated-events.h
 | 
			
		||||
GENERATED_SOURCES += trace/generated-events.c
 | 
			
		||||
 | 
			
		||||
GENERATED_HEADERS += trace/generated-tracers.h
 | 
			
		||||
ifeq ($(findstring dtrace,$(TRACE_BACKENDS)),dtrace)
 | 
			
		||||
GENERATED_HEADERS += trace/generated-tracers-dtrace.h
 | 
			
		||||
endif
 | 
			
		||||
GENERATED_SOURCES += trace/generated-tracers.c
 | 
			
		||||
 | 
			
		||||
ifeq ($(findstring ust,$(TRACE_BACKENDS)),ust)
 | 
			
		||||
GENERATED_HEADERS += trace/generated-ust-provider.h
 | 
			
		||||
GENERATED_SOURCES += trace/generated-ust.c
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# Don't try to regenerate Makefile or configure
 | 
			
		||||
# We don't generate any of them
 | 
			
		||||
Makefile: ;
 | 
			
		||||
configure: ;
 | 
			
		||||
 | 
			
		||||
.PHONY: all clean cscope distclean dvi html info install install-doc \
 | 
			
		||||
	pdf recurse-all speed test dist
 | 
			
		||||
	recurse-all speed tar tarbin test
 | 
			
		||||
 | 
			
		||||
$(call set-vpath, $(SRC_PATH))
 | 
			
		||||
VPATH=$(SRC_PATH):$(SRC_PATH)/hw
 | 
			
		||||
 | 
			
		||||
LIBS+=-lz $(LIBS_TOOLS)
 | 
			
		||||
 | 
			
		||||
HELPERS-$(CONFIG_LINUX) = qemu-bridge-helper$(EXESUF)
 | 
			
		||||
CFLAGS += $(OS_CFLAGS) $(ARCH_CFLAGS)
 | 
			
		||||
LDFLAGS += $(OS_LDFLAGS) $(ARCH_LDFLAGS)
 | 
			
		||||
 | 
			
		||||
ifdef BUILD_DOCS
 | 
			
		||||
DOCS=qemu-doc.html qemu-tech.html qemu.1 qemu-img.1 qemu-nbd.8 qmp-commands.txt
 | 
			
		||||
ifdef CONFIG_VIRTFS
 | 
			
		||||
DOCS+=fsdev/virtfs-proxy-helper.1
 | 
			
		||||
CPPFLAGS += -I. -I$(SRC_PATH) -MMD -MP -MT $@
 | 
			
		||||
CPPFLAGS += -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -D_LARGEFILE_SOURCE
 | 
			
		||||
LIBS=
 | 
			
		||||
ifdef CONFIG_STATIC
 | 
			
		||||
LDFLAGS += -static
 | 
			
		||||
endif
 | 
			
		||||
ifdef BUILD_DOCS
 | 
			
		||||
DOCS=qemu-doc.html qemu-tech.html qemu.1 qemu-img.1 qemu-nbd.8
 | 
			
		||||
else
 | 
			
		||||
DOCS=
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
SUBDIR_MAKEFLAGS=$(if $(V),,--no-print-directory) BUILD_DIR=$(BUILD_DIR)
 | 
			
		||||
SUBDIR_DEVICES_MAK=$(patsubst %, %/config-devices.mak, $(TARGET_DIRS))
 | 
			
		||||
SUBDIR_DEVICES_MAK_DEP=$(patsubst %, %-config-devices.mak.d, $(TARGET_DIRS))
 | 
			
		||||
LIBS+=$(AIOLIBS)
 | 
			
		||||
 | 
			
		||||
ifeq ($(SUBDIR_DEVICES_MAK),)
 | 
			
		||||
config-all-devices.mak:
 | 
			
		||||
	$(call quiet-command,echo '# no devices' > $@,"  GEN   $@")
 | 
			
		||||
else
 | 
			
		||||
config-all-devices.mak: $(SUBDIR_DEVICES_MAK)
 | 
			
		||||
	$(call quiet-command, sed -n \
 | 
			
		||||
             's|^\([^=]*\)=\(.*\)$$|\1:=$$(findstring y,$$(\1)\2)|p' \
 | 
			
		||||
             $(SUBDIR_DEVICES_MAK) | sort -u > $@, \
 | 
			
		||||
             "  GEN   $@")
 | 
			
		||||
ifdef CONFIG_SOLARIS
 | 
			
		||||
LIBS+=-lsocket -lnsl -lresolv
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
-include $(SUBDIR_DEVICES_MAK_DEP)
 | 
			
		||||
 | 
			
		||||
%/config-devices.mak: default-configs/%.mak
 | 
			
		||||
	$(call quiet-command,$(SHELL) $(SRC_PATH)/scripts/make_device_config.sh $@ $<, "  GEN   $@")
 | 
			
		||||
	@if test -f $@; then \
 | 
			
		||||
	  if cmp -s $@.old $@; then \
 | 
			
		||||
	    mv $@.tmp $@; \
 | 
			
		||||
	    cp -p $@ $@.old; \
 | 
			
		||||
	  else \
 | 
			
		||||
	    if test -f $@.old; then \
 | 
			
		||||
	      echo "WARNING: $@ (user modified) out of date.";\
 | 
			
		||||
	    else \
 | 
			
		||||
	      echo "WARNING: $@ out of date.";\
 | 
			
		||||
	    fi; \
 | 
			
		||||
	    echo "Run \"make defconfig\" to regenerate."; \
 | 
			
		||||
	    rm $@.tmp; \
 | 
			
		||||
	  fi; \
 | 
			
		||||
	 else \
 | 
			
		||||
	  mv $@.tmp $@; \
 | 
			
		||||
	  cp -p $@ $@.old; \
 | 
			
		||||
	 fi
 | 
			
		||||
 | 
			
		||||
defconfig:
 | 
			
		||||
	rm -f config-all-devices.mak $(SUBDIR_DEVICES_MAK)
 | 
			
		||||
 | 
			
		||||
ifneq ($(wildcard config-host.mak),)
 | 
			
		||||
include $(SRC_PATH)/Makefile.objs
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
LIBS+=-lwinmm -lws2_32 -liphlpapi
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
dummy := $(call unnest-vars,, \
 | 
			
		||||
                stub-obj-y \
 | 
			
		||||
                util-obj-y \
 | 
			
		||||
                qga-obj-y \
 | 
			
		||||
                qga-vss-dll-obj-y \
 | 
			
		||||
                block-obj-y \
 | 
			
		||||
                block-obj-m \
 | 
			
		||||
                common-obj-y \
 | 
			
		||||
                common-obj-m)
 | 
			
		||||
 | 
			
		||||
ifneq ($(wildcard config-host.mak),)
 | 
			
		||||
include $(SRC_PATH)/tests/Makefile
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(CONFIG_SMARTCARD_NSS),y)
 | 
			
		||||
include $(SRC_PATH)/libcacard/Makefile
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
all: $(DOCS) $(TOOLS) $(HELPERS-y) recurse-all modules
 | 
			
		||||
 | 
			
		||||
config-host.h: config-host.h-timestamp
 | 
			
		||||
config-host.h-timestamp: config-host.mak
 | 
			
		||||
qemu-options.def: $(SRC_PATH)/qemu-options.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -h < $< > $@,"  GEN   $@")
 | 
			
		||||
all: $(TOOLS) $(DOCS) recurse-all
 | 
			
		||||
 | 
			
		||||
SUBDIR_RULES=$(patsubst %,subdir-%, $(TARGET_DIRS))
 | 
			
		||||
SOFTMMU_SUBDIR_RULES=$(filter %-softmmu,$(SUBDIR_RULES))
 | 
			
		||||
 | 
			
		||||
$(SOFTMMU_SUBDIR_RULES): $(block-obj-y)
 | 
			
		||||
$(SOFTMMU_SUBDIR_RULES): config-all-devices.mak
 | 
			
		||||
 | 
			
		||||
subdir-%:
 | 
			
		||||
	$(call quiet-command,$(MAKE) $(SUBDIR_MAKEFLAGS) -C $* V="$(V)" TARGET_DIR="$*/" all,)
 | 
			
		||||
	$(call quiet-command,$(MAKE) -C $* V="$(V)" TARGET_DIR="$*/" all,)
 | 
			
		||||
 | 
			
		||||
subdir-pixman: pixman/Makefile
 | 
			
		||||
	$(call quiet-command,$(MAKE) $(SUBDIR_MAKEFLAGS) -C pixman V="$(V)" all,)
 | 
			
		||||
$(filter %-softmmu,$(SUBDIR_RULES)): libqemu_common.a
 | 
			
		||||
$(filter %-user,$(SUBDIR_RULES)): libqemu_user.a
 | 
			
		||||
 | 
			
		||||
pixman/Makefile: $(SRC_PATH)/pixman/configure
 | 
			
		||||
	(cd pixman; CFLAGS="$(CFLAGS) -fPIC $(extra_cflags) $(extra_ldflags)" $(SRC_PATH)/pixman/configure $(AUTOCONF_HOST) --disable-gtk --disable-shared --enable-static)
 | 
			
		||||
recurse-all: $(SUBDIR_RULES)
 | 
			
		||||
 | 
			
		||||
$(SRC_PATH)/pixman/configure:
 | 
			
		||||
	(cd $(SRC_PATH)/pixman; autoreconf -v --install)
 | 
			
		||||
#######################################################################
 | 
			
		||||
# BLOCK_OBJS is code used by both qemu system emulation and qemu-img
 | 
			
		||||
 | 
			
		||||
DTC_MAKE_ARGS=-I$(SRC_PATH)/dtc VPATH=$(SRC_PATH)/dtc -C dtc V="$(V)" LIBFDT_srcdir=$(SRC_PATH)/dtc/libfdt
 | 
			
		||||
DTC_CFLAGS=$(CFLAGS) $(QEMU_CFLAGS)
 | 
			
		||||
DTC_CPPFLAGS=-I$(BUILD_DIR)/dtc -I$(SRC_PATH)/dtc -I$(SRC_PATH)/dtc/libfdt
 | 
			
		||||
BLOCK_OBJS=cutils.o qemu-malloc.o
 | 
			
		||||
BLOCK_OBJS+=block-cow.o block-qcow.o aes.o block-vmdk.o block-cloop.o
 | 
			
		||||
BLOCK_OBJS+=block-dmg.o block-bochs.o block-vpc.o block-vvfat.o
 | 
			
		||||
BLOCK_OBJS+=block-qcow2.o block-parallels.o block-nbd.o
 | 
			
		||||
BLOCK_OBJS+=nbd.o block.o aio.o
 | 
			
		||||
 | 
			
		||||
subdir-dtc:dtc/libfdt dtc/tests
 | 
			
		||||
	$(call quiet-command,$(MAKE) $(DTC_MAKE_ARGS) CPPFLAGS="$(DTC_CPPFLAGS)" CFLAGS="$(DTC_CFLAGS)" LDFLAGS="$(LDFLAGS)" ARFLAGS="$(ARFLAGS)" CC="$(CC)" AR="$(AR)" LD="$(LD)" $(SUBDIR_MAKEFLAGS) libfdt/libfdt.a,)
 | 
			
		||||
 | 
			
		||||
dtc/%:
 | 
			
		||||
	mkdir -p $@
 | 
			
		||||
 | 
			
		||||
$(SUBDIR_RULES): libqemuutil.a libqemustub.a $(common-obj-y)
 | 
			
		||||
 | 
			
		||||
ROMSUBDIR_RULES=$(patsubst %,romsubdir-%, $(ROMS))
 | 
			
		||||
romsubdir-%:
 | 
			
		||||
	$(call quiet-command,$(MAKE) $(SUBDIR_MAKEFLAGS) -C pc-bios/$* V="$(V)" TARGET_DIR="$*/",)
 | 
			
		||||
 | 
			
		||||
ALL_SUBDIRS=$(TARGET_DIRS) $(patsubst %,pc-bios/%, $(ROMS))
 | 
			
		||||
 | 
			
		||||
recurse-all: $(SUBDIR_RULES) $(ROMSUBDIR_RULES)
 | 
			
		||||
 | 
			
		||||
$(BUILD_DIR)/version.o: $(SRC_PATH)/version.rc $(BUILD_DIR)/config-host.h | $(BUILD_DIR)/version.lo
 | 
			
		||||
	$(call quiet-command,$(WINDRES) -I$(BUILD_DIR) -o $@ $<,"  RC    version.o")
 | 
			
		||||
$(BUILD_DIR)/version.lo: $(SRC_PATH)/version.rc $(BUILD_DIR)/config-host.h
 | 
			
		||||
	$(call quiet-command,$(WINDRES) -I$(BUILD_DIR) -o $@ $<,"  RC    version.lo")
 | 
			
		||||
 | 
			
		||||
Makefile: $(version-obj-y) $(version-lobj-y)
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
BLOCK_OBJS += block-raw-win32.o
 | 
			
		||||
else
 | 
			
		||||
ifdef CONFIG_AIO
 | 
			
		||||
BLOCK_OBJS += posix-aio-compat.o
 | 
			
		||||
endif
 | 
			
		||||
BLOCK_OBJS += block-raw-posix.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# Build libraries
 | 
			
		||||
# libqemu_common.a: Target independent part of system emulation. The
 | 
			
		||||
# long term path is to suppress *all* target specific code in case of
 | 
			
		||||
# system emulation, i.e. a single QEMU executable should support all
 | 
			
		||||
# CPUs and machines.
 | 
			
		||||
 | 
			
		||||
libqemustub.a: $(stub-obj-y)
 | 
			
		||||
libqemuutil.a: $(util-obj-y) qapi-types.o qapi-visit.o qapi-event.o
 | 
			
		||||
OBJS=$(BLOCK_OBJS)
 | 
			
		||||
OBJS+=readline.o console.o
 | 
			
		||||
 | 
			
		||||
block-modules = $(foreach o,$(block-obj-m),"$(basename $(subst /,-,$o))",) NULL
 | 
			
		||||
util/module.o-cflags = -D'CONFIG_BLOCK_MODULES=$(block-modules)'
 | 
			
		||||
OBJS+=irq.o
 | 
			
		||||
OBJS+=i2c.o smbus.o smbus_eeprom.o max7310.o max111x.o wm8750.o
 | 
			
		||||
OBJS+=ssd0303.o ssd0323.o ads7846.o stellaris_input.o twl92230.o
 | 
			
		||||
OBJS+=tmp105.o lm832x.o
 | 
			
		||||
OBJS+=scsi-disk.o cdrom.o
 | 
			
		||||
OBJS+=scsi-generic.o
 | 
			
		||||
OBJS+=usb.o usb-hub.o usb-$(HOST_USB).o usb-hid.o usb-msd.o usb-wacom.o
 | 
			
		||||
OBJS+=usb-serial.o usb-net.o
 | 
			
		||||
OBJS+=sd.o ssi-sd.o
 | 
			
		||||
OBJS+=bt.o bt-host.o bt-vhci.o bt-l2cap.o bt-sdp.o bt-hci.o bt-hid.o usb-bt.o
 | 
			
		||||
OBJS+=buffered_file.o migration.o migration-tcp.o net.o qemu-sockets.o
 | 
			
		||||
OBJS+=qemu-char.o aio.o net-checksum.o savevm.o cache-utils.o
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_BRLAPI
 | 
			
		||||
OBJS+= baum.o
 | 
			
		||||
LIBS+=-lbrlapi
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
OBJS+=tap-win32.o
 | 
			
		||||
else
 | 
			
		||||
OBJS+=migration-exec.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
AUDIO_OBJS = audio.o noaudio.o wavaudio.o mixeng.o
 | 
			
		||||
ifdef CONFIG_SDL
 | 
			
		||||
AUDIO_OBJS += sdlaudio.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_OSS
 | 
			
		||||
AUDIO_OBJS += ossaudio.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_COREAUDIO
 | 
			
		||||
AUDIO_OBJS += coreaudio.o
 | 
			
		||||
AUDIO_PT = yes
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_ALSA
 | 
			
		||||
AUDIO_OBJS += alsaaudio.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_DSOUND
 | 
			
		||||
AUDIO_OBJS += dsoundaudio.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_FMOD
 | 
			
		||||
AUDIO_OBJS += fmodaudio.o
 | 
			
		||||
audio/audio.o audio/fmodaudio.o: CPPFLAGS := -I$(CONFIG_FMOD_INC) $(CPPFLAGS)
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_ESD
 | 
			
		||||
AUDIO_PT = yes
 | 
			
		||||
AUDIO_PT_INT = yes
 | 
			
		||||
AUDIO_OBJS += esdaudio.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_PA
 | 
			
		||||
AUDIO_PT = yes
 | 
			
		||||
AUDIO_PT_INT = yes
 | 
			
		||||
AUDIO_OBJS += paaudio.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef AUDIO_PT
 | 
			
		||||
LDFLAGS += -pthread
 | 
			
		||||
endif
 | 
			
		||||
ifdef AUDIO_PT_INT
 | 
			
		||||
AUDIO_OBJS += audio_pt_int.o
 | 
			
		||||
endif
 | 
			
		||||
AUDIO_OBJS+= wavcapture.o
 | 
			
		||||
OBJS+=$(addprefix audio/, $(AUDIO_OBJS))
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_SDL
 | 
			
		||||
OBJS+=sdl.o x_keymap.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_CURSES
 | 
			
		||||
OBJS+=curses.o
 | 
			
		||||
endif
 | 
			
		||||
OBJS+=vnc.o d3des.o
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_COCOA
 | 
			
		||||
OBJS+=cocoa.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_SLIRP
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/slirp
 | 
			
		||||
SLIRP_OBJS=cksum.o if.o ip_icmp.o ip_input.o ip_output.o \
 | 
			
		||||
slirp.o mbuf.o misc.o sbuf.o socket.o tcp_input.o tcp_output.o \
 | 
			
		||||
tcp_subr.o tcp_timer.o udp.o bootp.o debug.o tftp.o
 | 
			
		||||
OBJS+=$(addprefix slirp/, $(SLIRP_OBJS))
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
LIBS+=$(VDE_LIBS)
 | 
			
		||||
 | 
			
		||||
cocoa.o: cocoa.m
 | 
			
		||||
 | 
			
		||||
sdl.o: sdl.c keymaps.c sdl_keysym.h
 | 
			
		||||
 | 
			
		||||
sdl.o audio/sdlaudio.o: CFLAGS += $(SDL_CFLAGS)
 | 
			
		||||
 | 
			
		||||
vnc.o: vnc.c keymaps.c sdl_keysym.h vnchextile.h d3des.c d3des.h
 | 
			
		||||
 | 
			
		||||
vnc.o: CFLAGS += $(CONFIG_VNC_TLS_CFLAGS)
 | 
			
		||||
 | 
			
		||||
curses.o: curses.c keymaps.c curses_keys.h
 | 
			
		||||
 | 
			
		||||
bt-host.o: CFLAGS += $(CONFIG_BLUEZ_CFLAGS)
 | 
			
		||||
 | 
			
		||||
libqemu_common.a: $(OBJS)
 | 
			
		||||
 | 
			
		||||
#######################################################################
 | 
			
		||||
# USER_OBJS is code used by qemu userspace emulation
 | 
			
		||||
USER_OBJS=cutils.o  cache-utils.o
 | 
			
		||||
 | 
			
		||||
libqemu_user.a: $(USER_OBJS)
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
 | 
			
		||||
qemu-img.o: qemu-img-cmds.h
 | 
			
		||||
qemu-img$(EXESUF): qemu-img.o qemu-tool.o osdep.o $(BLOCK_OBJS)
 | 
			
		||||
 | 
			
		||||
qemu-img$(EXESUF): qemu-img.o $(block-obj-y) libqemuutil.a libqemustub.a
 | 
			
		||||
qemu-nbd$(EXESUF): qemu-nbd.o $(block-obj-y) libqemuutil.a libqemustub.a
 | 
			
		||||
qemu-io$(EXESUF): qemu-io.o $(block-obj-y) libqemuutil.a libqemustub.a
 | 
			
		||||
qemu-nbd$(EXESUF):  qemu-nbd.o qemu-tool.o osdep.o $(BLOCK_OBJS)
 | 
			
		||||
 | 
			
		||||
qemu-bridge-helper$(EXESUF): qemu-bridge-helper.o
 | 
			
		||||
 | 
			
		||||
fsdev/virtfs-proxy-helper$(EXESUF): fsdev/virtfs-proxy-helper.o fsdev/virtio-9p-marshal.o libqemuutil.a libqemustub.a
 | 
			
		||||
fsdev/virtfs-proxy-helper$(EXESUF): LIBS += -lcap
 | 
			
		||||
 | 
			
		||||
qemu-img-cmds.h: $(SRC_PATH)/qemu-img-cmds.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -h < $< > $@,"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
qemu-ga$(EXESUF): LIBS = $(LIBS_QGA)
 | 
			
		||||
qemu-ga$(EXESUF): QEMU_CFLAGS += -I qga/qapi-generated
 | 
			
		||||
 | 
			
		||||
gen-out-type = $(subst .,-,$(suffix $@))
 | 
			
		||||
 | 
			
		||||
qapi-py = $(SRC_PATH)/scripts/qapi.py $(SRC_PATH)/scripts/ordereddict.py
 | 
			
		||||
 | 
			
		||||
qga/qapi-generated/qga-qapi-types.c qga/qapi-generated/qga-qapi-types.h :\
 | 
			
		||||
$(SRC_PATH)/qga/qapi-schema.json $(SRC_PATH)/scripts/qapi-types.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-types.py \
 | 
			
		||||
		$(gen-out-type) -o qga/qapi-generated -p "qga-" -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
qga/qapi-generated/qga-qapi-visit.c qga/qapi-generated/qga-qapi-visit.h :\
 | 
			
		||||
$(SRC_PATH)/qga/qapi-schema.json $(SRC_PATH)/scripts/qapi-visit.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-visit.py \
 | 
			
		||||
		$(gen-out-type) -o qga/qapi-generated -p "qga-" -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
qga/qapi-generated/qga-qmp-commands.h qga/qapi-generated/qga-qmp-marshal.c :\
 | 
			
		||||
$(SRC_PATH)/qga/qapi-schema.json $(SRC_PATH)/scripts/qapi-commands.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-commands.py \
 | 
			
		||||
		$(gen-out-type) -o qga/qapi-generated -p "qga-" -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
qapi-modules = $(SRC_PATH)/qapi-schema.json $(SRC_PATH)/qapi/common.json \
 | 
			
		||||
               $(SRC_PATH)/qapi/block.json $(SRC_PATH)/qapi/block-core.json \
 | 
			
		||||
               $(SRC_PATH)/qapi/event.json
 | 
			
		||||
 | 
			
		||||
qapi-types.c qapi-types.h :\
 | 
			
		||||
$(qapi-modules) $(SRC_PATH)/scripts/qapi-types.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-types.py \
 | 
			
		||||
		$(gen-out-type) -o "." -b -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
qapi-visit.c qapi-visit.h :\
 | 
			
		||||
$(qapi-modules) $(SRC_PATH)/scripts/qapi-visit.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-visit.py \
 | 
			
		||||
		$(gen-out-type) -o "." -b -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
qapi-event.c qapi-event.h :\
 | 
			
		||||
$(qapi-modules) $(SRC_PATH)/scripts/qapi-event.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-event.py \
 | 
			
		||||
		$(gen-out-type) -o "." -b -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
qmp-commands.h qmp-marshal.c :\
 | 
			
		||||
$(qapi-modules) $(SRC_PATH)/scripts/qapi-commands.py $(qapi-py)
 | 
			
		||||
	$(call quiet-command,$(PYTHON) $(SRC_PATH)/scripts/qapi-commands.py \
 | 
			
		||||
		$(gen-out-type) -o "." -m -i $<, \
 | 
			
		||||
		"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
QGALIB_GEN=$(addprefix qga/qapi-generated/, qga-qapi-types.h qga-qapi-visit.h qga-qmp-commands.h)
 | 
			
		||||
$(qga-obj-y) qemu-ga.o: $(QGALIB_GEN)
 | 
			
		||||
 | 
			
		||||
qemu-ga$(EXESUF): $(qga-obj-y) libqemuutil.a libqemustub.a
 | 
			
		||||
	$(call LINK, $^)
 | 
			
		||||
qemu-img$(EXESUF) qemu-nbd$(EXESUF): LIBS += -lz
 | 
			
		||||
 | 
			
		||||
clean:
 | 
			
		||||
# avoid old build problems by removing potentially incorrect old files
 | 
			
		||||
	rm -f config.mak op-i386.h opc-i386.h gen-op-i386.h op-arm.h opc-arm.h gen-op-arm.h
 | 
			
		||||
	rm -f qemu-options.def
 | 
			
		||||
	find . \( -name '*.l[oa]' -o -name '*.so' -o -name '*.dll' -o -name '*.mo' -o -name '*.[oda]' \) -type f -exec rm {} +
 | 
			
		||||
	rm -f $(filter-out %.tlb,$(TOOLS)) $(HELPERS-y) qemu-ga TAGS cscope.* *.pod *~ */*~
 | 
			
		||||
	rm -f fsdev/*.pod
 | 
			
		||||
	rm -rf .libs */.libs
 | 
			
		||||
	rm -f qemu-img-cmds.h
 | 
			
		||||
	@# May not be present in GENERATED_HEADERS
 | 
			
		||||
	rm -f trace/generated-tracers-dtrace.dtrace*
 | 
			
		||||
	rm -f trace/generated-tracers-dtrace.h*
 | 
			
		||||
	rm -f $(foreach f,$(GENERATED_HEADERS),$(f) $(f)-timestamp)
 | 
			
		||||
	rm -f $(foreach f,$(GENERATED_SOURCES),$(f) $(f)-timestamp)
 | 
			
		||||
	rm -rf qapi-generated
 | 
			
		||||
	rm -rf qga/qapi-generated
 | 
			
		||||
	for d in $(ALL_SUBDIRS); do \
 | 
			
		||||
	if test -d $$d; then $(MAKE) -C $$d $@ || exit 1; fi; \
 | 
			
		||||
	rm -f $$d/qemu-options.def; \
 | 
			
		||||
	rm -f config.mak config.h op-i386.h opc-i386.h gen-op-i386.h op-arm.h opc-arm.h gen-op-arm.h
 | 
			
		||||
	rm -f *.o *.d *.a $(TOOLS) TAGS cscope.* *.pod *~ */*~
 | 
			
		||||
	rm -f slirp/*.o slirp/*.d audio/*.o audio/*.d
 | 
			
		||||
	$(MAKE) -C tests clean
 | 
			
		||||
	for d in $(TARGET_DIRS); do \
 | 
			
		||||
	$(MAKE) -C $$d $@ || exit 1 ; \
 | 
			
		||||
        done
 | 
			
		||||
 | 
			
		||||
VERSION ?= $(shell cat VERSION)
 | 
			
		||||
 | 
			
		||||
dist: qemu-$(VERSION).tar.bz2
 | 
			
		||||
 | 
			
		||||
qemu-%.tar.bz2:
 | 
			
		||||
	$(SRC_PATH)/scripts/make-release "$(SRC_PATH)" "$(patsubst qemu-%.tar.bz2,%,$@)"
 | 
			
		||||
 | 
			
		||||
distclean: clean
 | 
			
		||||
	rm -f config-host.mak config-host.h* config-host.ld $(DOCS) qemu-options.texi qemu-img-cmds.texi qemu-monitor.texi
 | 
			
		||||
	rm -f config-all-devices.mak config-all-disas.mak
 | 
			
		||||
	rm -f po/*.mo
 | 
			
		||||
	rm -f roms/seabios/config.mak roms/vgabios/config.mak
 | 
			
		||||
	rm -f qemu-doc.info qemu-doc.aux qemu-doc.cp qemu-doc.cps qemu-doc.dvi
 | 
			
		||||
	rm -f qemu-doc.fn qemu-doc.fns qemu-doc.info qemu-doc.ky qemu-doc.kys
 | 
			
		||||
	rm -f qemu-doc.log qemu-doc.pdf qemu-doc.pg qemu-doc.toc qemu-doc.tp
 | 
			
		||||
	rm -f qemu-doc.vr
 | 
			
		||||
	rm -f config.log
 | 
			
		||||
	rm -f linux-headers/asm
 | 
			
		||||
	rm -f qemu-tech.info qemu-tech.aux qemu-tech.cp qemu-tech.dvi qemu-tech.fn qemu-tech.info qemu-tech.ky qemu-tech.log qemu-tech.pdf qemu-tech.pg qemu-tech.toc qemu-tech.tp qemu-tech.vr
 | 
			
		||||
	rm -f config-host.mak config-host.h $(DOCS)
 | 
			
		||||
	rm -f qemu-{doc,tech}.{info,aux,cp,dvi,fn,info,ky,log,pg,toc,tp,vr}
 | 
			
		||||
	for d in $(TARGET_DIRS); do \
 | 
			
		||||
	rm -rf $$d || exit 1 ; \
 | 
			
		||||
        done
 | 
			
		||||
	rm -Rf .sdk
 | 
			
		||||
	if test -f pixman/config.log; then make -C pixman distclean; fi
 | 
			
		||||
	if test -f dtc/version_gen.h; then make $(DTC_MAKE_ARGS) clean; fi
 | 
			
		||||
 | 
			
		||||
KEYMAPS=da     en-gb  et  fr     fr-ch  is  lt  modifiers  no  pt-br  sv \
 | 
			
		||||
ar      de     en-us  fi  fr-be  hr     it  lv  nl         pl  ru     th \
 | 
			
		||||
common  de-ch  es     fo  fr-ca  hu     ja  mk  nl-be      pt  sl     tr \
 | 
			
		||||
bepo    cz
 | 
			
		||||
common  de-ch  es     fo  fr-ca  hu     ja  mk  nl-be      pt  sl     tr
 | 
			
		||||
 | 
			
		||||
ifdef INSTALL_BLOBS
 | 
			
		||||
BLOBS=bios.bin bios-256k.bin sgabios.bin vgabios.bin vgabios-cirrus.bin \
 | 
			
		||||
vgabios-stdvga.bin vgabios-vmware.bin vgabios-qxl.bin \
 | 
			
		||||
acpi-dsdt.aml q35-acpi-dsdt.aml \
 | 
			
		||||
ppc_rom.bin openbios-sparc32 openbios-sparc64 openbios-ppc QEMU,tcx.bin QEMU,cgthree.bin \
 | 
			
		||||
pxe-e1000.rom pxe-eepro100.rom pxe-ne2k_pci.rom \
 | 
			
		||||
pxe-pcnet.rom pxe-rtl8139.rom pxe-virtio.rom \
 | 
			
		||||
efi-e1000.rom efi-eepro100.rom efi-ne2k_pci.rom \
 | 
			
		||||
efi-pcnet.rom efi-rtl8139.rom efi-virtio.rom \
 | 
			
		||||
qemu-icon.bmp qemu_logo_no_text.svg \
 | 
			
		||||
bamboo.dtb petalogix-s3adsp1800.dtb petalogix-ml605.dtb \
 | 
			
		||||
multiboot.bin linuxboot.bin kvmvapic.bin \
 | 
			
		||||
s390-zipl.rom \
 | 
			
		||||
s390-ccw.img \
 | 
			
		||||
spapr-rtas.bin slof.bin \
 | 
			
		||||
palcode-clipper \
 | 
			
		||||
u-boot.e500
 | 
			
		||||
BLOBS=bios.bin vgabios.bin vgabios-cirrus.bin ppc_rom.bin \
 | 
			
		||||
video.x openbios-sparc32 openbios-sparc64 openbios-ppc \
 | 
			
		||||
pxe-ne2k_pci.bin pxe-rtl8139.bin pxe-pcnet.bin pxe-e1000.bin \
 | 
			
		||||
bamboo.dtb
 | 
			
		||||
else
 | 
			
		||||
BLOBS=
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
install-doc: $(DOCS)
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_docdir)"
 | 
			
		||||
	$(INSTALL_DATA) qemu-doc.html  qemu-tech.html "$(DESTDIR)$(qemu_docdir)"
 | 
			
		||||
	$(INSTALL_DATA) qmp-commands.txt "$(DESTDIR)$(qemu_docdir)"
 | 
			
		||||
ifdef CONFIG_POSIX
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
	$(INSTALL_DATA) qemu.1 "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
	mkdir -p "$(DESTDIR)$(docdir)"
 | 
			
		||||
	$(INSTALL) -m 644 qemu-doc.html  qemu-tech.html "$(DESTDIR)$(docdir)"
 | 
			
		||||
ifndef CONFIG_WIN32
 | 
			
		||||
	mkdir -p "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
	$(INSTALL) -m 644 qemu.1 qemu-img.1 "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
	mkdir -p "$(DESTDIR)$(mandir)/man8"
 | 
			
		||||
	$(INSTALL) -m 644 qemu-nbd.8 "$(DESTDIR)$(mandir)/man8"
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
install: all $(if $(BUILD_DOCS),install-doc)
 | 
			
		||||
	mkdir -p "$(DESTDIR)$(bindir)"
 | 
			
		||||
ifneq ($(TOOLS),)
 | 
			
		||||
	$(INSTALL_DATA) qemu-img.1 "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(mandir)/man8"
 | 
			
		||||
	$(INSTALL_DATA) qemu-nbd.8 "$(DESTDIR)$(mandir)/man8"
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_VIRTFS
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
	$(INSTALL_DATA) fsdev/virtfs-proxy-helper.1 "$(DESTDIR)$(mandir)/man1"
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
install-datadir:
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_datadir)"
 | 
			
		||||
 | 
			
		||||
install-localstatedir:
 | 
			
		||||
ifdef CONFIG_POSIX
 | 
			
		||||
ifneq (,$(findstring qemu-ga,$(TOOLS)))
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_localstatedir)"/run
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
install-confdir:
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_confdir)"
 | 
			
		||||
 | 
			
		||||
install-sysconfig: install-datadir install-confdir
 | 
			
		||||
	$(INSTALL_DATA) $(SRC_PATH)/sysconfigs/target/target-x86_64.conf "$(DESTDIR)$(qemu_confdir)"
 | 
			
		||||
 | 
			
		||||
install: all $(if $(BUILD_DOCS),install-doc) install-sysconfig \
 | 
			
		||||
install-datadir install-localstatedir
 | 
			
		||||
ifneq ($(TOOLS),)
 | 
			
		||||
	$(call install-prog,$(TOOLS),$(DESTDIR)$(bindir))
 | 
			
		||||
endif
 | 
			
		||||
ifneq ($(CONFIG_MODULES),)
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_moddir)"
 | 
			
		||||
	for s in $(modules-m:.mo=$(DSOSUF)); do \
 | 
			
		||||
		t="$(DESTDIR)$(qemu_moddir)/$$(echo $$s | tr / -)"; \
 | 
			
		||||
		$(INSTALL_LIB) $$s "$$t"; \
 | 
			
		||||
		test -z "$(STRIP)" || $(STRIP) "$$t"; \
 | 
			
		||||
	done
 | 
			
		||||
endif
 | 
			
		||||
ifneq ($(HELPERS-y),)
 | 
			
		||||
	$(call install-prog,$(HELPERS-y),$(DESTDIR)$(libexecdir))
 | 
			
		||||
	$(INSTALL) -m 755 -s $(TOOLS) "$(DESTDIR)$(bindir)"
 | 
			
		||||
endif
 | 
			
		||||
ifneq ($(BLOBS),)
 | 
			
		||||
	mkdir -p "$(DESTDIR)$(datadir)"
 | 
			
		||||
	set -e; for x in $(BLOBS); do \
 | 
			
		||||
		$(INSTALL_DATA) $(SRC_PATH)/pc-bios/$$x "$(DESTDIR)$(qemu_datadir)"; \
 | 
			
		||||
		$(INSTALL) -m 644 $(SRC_PATH)/pc-bios/$$x "$(DESTDIR)$(datadir)"; \
 | 
			
		||||
	done
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(CONFIG_GTK),y)
 | 
			
		||||
	$(MAKE) -C po $@
 | 
			
		||||
endif
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_datadir)/keymaps"
 | 
			
		||||
ifndef CONFIG_WIN32
 | 
			
		||||
	mkdir -p "$(DESTDIR)$(datadir)/keymaps"
 | 
			
		||||
	set -e; for x in $(KEYMAPS); do \
 | 
			
		||||
		$(INSTALL_DATA) $(SRC_PATH)/pc-bios/keymaps/$$x "$(DESTDIR)$(qemu_datadir)/keymaps"; \
 | 
			
		||||
		$(INSTALL) -m 644 $(SRC_PATH)/keymaps/$$x "$(DESTDIR)$(datadir)/keymaps"; \
 | 
			
		||||
	done
 | 
			
		||||
endif
 | 
			
		||||
	for d in $(TARGET_DIRS); do \
 | 
			
		||||
	$(MAKE) $(SUBDIR_MAKEFLAGS) TARGET_DIR=$$d/ -C $$d $@ || exit 1 ; \
 | 
			
		||||
	$(MAKE) -C $$d $@ || exit 1 ; \
 | 
			
		||||
        done
 | 
			
		||||
 | 
			
		||||
# various test targets
 | 
			
		||||
test speed: all
 | 
			
		||||
	$(MAKE) -C tests/tcg $@
 | 
			
		||||
	$(MAKE) -C tests $@
 | 
			
		||||
 | 
			
		||||
.PHONY: TAGS
 | 
			
		||||
TAGS:
 | 
			
		||||
	rm -f $@
 | 
			
		||||
	find "$(SRC_PATH)" -name '*.[hc]' -exec etags --append {} +
 | 
			
		||||
	etags *.[ch] tests/*.[ch]
 | 
			
		||||
 | 
			
		||||
cscope:
 | 
			
		||||
	rm -f ./cscope.*
 | 
			
		||||
	find "$(SRC_PATH)" -name "*.[chsS]" -print | sed 's,^\./,,' > ./cscope.files
 | 
			
		||||
	find . -name "*.[ch]" -print | sed 's,^\./,,' > ./cscope.files
 | 
			
		||||
	cscope -b
 | 
			
		||||
 | 
			
		||||
# documentation
 | 
			
		||||
MAKEINFO=makeinfo
 | 
			
		||||
MAKEINFOFLAGS=--no-headers --no-split --number-sections
 | 
			
		||||
TEXIFLAG=$(if $(V),,--quiet)
 | 
			
		||||
%.dvi: %.texi
 | 
			
		||||
	$(call quiet-command,texi2dvi $(TEXIFLAG) -I . $<,"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
%.html: %.texi
 | 
			
		||||
	$(call quiet-command,LC_ALL=C $(MAKEINFO) $(MAKEINFOFLAGS) --html $< -o $@, \
 | 
			
		||||
	"  GEN   $@")
 | 
			
		||||
	texi2html -monolithic -number $<
 | 
			
		||||
 | 
			
		||||
%.info: %.texi
 | 
			
		||||
	$(call quiet-command,$(MAKEINFO) $< -o $@,"  GEN   $@")
 | 
			
		||||
	makeinfo $< -o $@
 | 
			
		||||
 | 
			
		||||
%.pdf: %.texi
 | 
			
		||||
	$(call quiet-command,texi2pdf $(TEXIFLAG) -I . $<,"  GEN   $@")
 | 
			
		||||
%.dvi: %.texi
 | 
			
		||||
	texi2dvi $<
 | 
			
		||||
 | 
			
		||||
qemu-options.texi: $(SRC_PATH)/qemu-options.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -t < $< > $@,"  GEN   $@")
 | 
			
		||||
qemu.1: qemu-doc.texi
 | 
			
		||||
	$(SRC_PATH)/texi2pod.pl $< qemu.pod
 | 
			
		||||
	pod2man --section=1 --center=" " --release=" " qemu.pod > $@
 | 
			
		||||
 | 
			
		||||
qemu-monitor.texi: $(SRC_PATH)/hmp-commands.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -t < $< > $@,"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
qmp-commands.txt: $(SRC_PATH)/qmp-commands.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -q < $< > $@,"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
qemu-img-cmds.texi: $(SRC_PATH)/qemu-img-cmds.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -t < $< > $@,"  GEN   $@")
 | 
			
		||||
 | 
			
		||||
qemu.1: qemu-doc.texi qemu-options.texi qemu-monitor.texi
 | 
			
		||||
	$(call quiet-command, \
 | 
			
		||||
	  perl -Ww -- $(SRC_PATH)/scripts/texi2pod.pl $< qemu.pod && \
 | 
			
		||||
	  $(POD2MAN) --section=1 --center=" " --release=" " qemu.pod > $@, \
 | 
			
		||||
	  "  GEN   $@")
 | 
			
		||||
 | 
			
		||||
qemu-img.1: qemu-img.texi qemu-img-cmds.texi
 | 
			
		||||
	$(call quiet-command, \
 | 
			
		||||
	  perl -Ww -- $(SRC_PATH)/scripts/texi2pod.pl $< qemu-img.pod && \
 | 
			
		||||
	  $(POD2MAN) --section=1 --center=" " --release=" " qemu-img.pod > $@, \
 | 
			
		||||
	  "  GEN   $@")
 | 
			
		||||
 | 
			
		||||
fsdev/virtfs-proxy-helper.1: fsdev/virtfs-proxy-helper.texi
 | 
			
		||||
	$(call quiet-command, \
 | 
			
		||||
	  perl -Ww -- $(SRC_PATH)/scripts/texi2pod.pl $< fsdev/virtfs-proxy-helper.pod && \
 | 
			
		||||
	  $(POD2MAN) --section=1 --center=" " --release=" " fsdev/virtfs-proxy-helper.pod > $@, \
 | 
			
		||||
	  "  GEN   $@")
 | 
			
		||||
qemu-img.1: qemu-img.texi
 | 
			
		||||
	$(SRC_PATH)/texi2pod.pl $< qemu-img.pod
 | 
			
		||||
	pod2man --section=1 --center=" " --release=" " qemu-img.pod > $@
 | 
			
		||||
 | 
			
		||||
qemu-nbd.8: qemu-nbd.texi
 | 
			
		||||
	$(call quiet-command, \
 | 
			
		||||
	  perl -Ww -- $(SRC_PATH)/scripts/texi2pod.pl $< qemu-nbd.pod && \
 | 
			
		||||
	  $(POD2MAN) --section=8 --center=" " --release=" " qemu-nbd.pod > $@, \
 | 
			
		||||
	  "  GEN   $@")
 | 
			
		||||
	$(SRC_PATH)/texi2pod.pl $< qemu-nbd.pod
 | 
			
		||||
	pod2man --section=8 --center=" " --release=" " qemu-nbd.pod > $@
 | 
			
		||||
 | 
			
		||||
info: qemu-doc.info qemu-tech.info
 | 
			
		||||
 | 
			
		||||
dvi: qemu-doc.dvi qemu-tech.dvi
 | 
			
		||||
 | 
			
		||||
html: qemu-doc.html qemu-tech.html
 | 
			
		||||
info: qemu-doc.info qemu-tech.info
 | 
			
		||||
pdf: qemu-doc.pdf qemu-tech.pdf
 | 
			
		||||
 | 
			
		||||
qemu-doc.dvi qemu-doc.html qemu-doc.info qemu-doc.pdf: \
 | 
			
		||||
	qemu-img.texi qemu-nbd.texi qemu-options.texi \
 | 
			
		||||
	qemu-monitor.texi qemu-img-cmds.texi
 | 
			
		||||
qemu-doc.dvi qemu-doc.html qemu-doc.info: qemu-img.texi qemu-nbd.texi
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
VERSION ?= $(shell cat VERSION)
 | 
			
		||||
FILE = qemu-$(VERSION)
 | 
			
		||||
 | 
			
		||||
INSTALLER = qemu-setup-$(VERSION)$(EXESUF)
 | 
			
		||||
# tar release (use 'make -k tar' on a checkouted tree)
 | 
			
		||||
tar:
 | 
			
		||||
	rm -rf /tmp/$(FILE)
 | 
			
		||||
	cp -r . /tmp/$(FILE)
 | 
			
		||||
	cd /tmp && tar zcvf ~/$(FILE).tar.gz $(FILE) --exclude CVS --exclude .git --exclude .svn
 | 
			
		||||
	rm -rf /tmp/$(FILE)
 | 
			
		||||
 | 
			
		||||
nsisflags = -V2 -NOCD
 | 
			
		||||
 | 
			
		||||
ifneq ($(wildcard $(SRC_PATH)/dll),)
 | 
			
		||||
ifeq ($(ARCH),x86_64)
 | 
			
		||||
# 64 bit executables
 | 
			
		||||
DLL_PATH = $(SRC_PATH)/dll/w64
 | 
			
		||||
nsisflags += -DW64
 | 
			
		||||
else
 | 
			
		||||
# 32 bit executables
 | 
			
		||||
DLL_PATH = $(SRC_PATH)/dll/w32
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
.PHONY: installer
 | 
			
		||||
installer: $(INSTALLER)
 | 
			
		||||
 | 
			
		||||
INSTDIR=/tmp/qemu-nsis
 | 
			
		||||
 | 
			
		||||
$(INSTALLER): $(SRC_PATH)/qemu.nsi
 | 
			
		||||
	make install prefix=${INSTDIR}
 | 
			
		||||
ifdef SIGNCODE
 | 
			
		||||
	(cd ${INSTDIR}; \
 | 
			
		||||
         for i in *.exe; do \
 | 
			
		||||
           $(SIGNCODE) $${i}; \
 | 
			
		||||
         done \
 | 
			
		||||
        )
 | 
			
		||||
endif # SIGNCODE
 | 
			
		||||
	(cd ${INSTDIR}; \
 | 
			
		||||
         for i in qemu-system-*.exe; do \
 | 
			
		||||
           arch=$${i%.exe}; \
 | 
			
		||||
           arch=$${arch#qemu-system-}; \
 | 
			
		||||
           echo Section \"$$arch\" Section_$$arch; \
 | 
			
		||||
           echo SetOutPath \"\$$INSTDIR\"; \
 | 
			
		||||
           echo File \"\$${BINDIR}\\$$i\"; \
 | 
			
		||||
           echo SectionEnd; \
 | 
			
		||||
         done \
 | 
			
		||||
        ) >${INSTDIR}/system-emulations.nsh
 | 
			
		||||
	makensis $(nsisflags) \
 | 
			
		||||
                $(if $(BUILD_DOCS),-DCONFIG_DOCUMENTATION="y") \
 | 
			
		||||
                $(if $(CONFIG_GTK),-DCONFIG_GTK="y") \
 | 
			
		||||
                -DBINDIR="${INSTDIR}" \
 | 
			
		||||
                $(if $(DLL_PATH),-DDLLDIR="$(DLL_PATH)") \
 | 
			
		||||
                -DSRCDIR="$(SRC_PATH)" \
 | 
			
		||||
                -DOUTFILE="$(INSTALLER)" \
 | 
			
		||||
                $(SRC_PATH)/qemu.nsi
 | 
			
		||||
	rm -r ${INSTDIR}
 | 
			
		||||
ifdef SIGNCODE
 | 
			
		||||
	$(SIGNCODE) $(INSTALLER)
 | 
			
		||||
endif # SIGNCODE
 | 
			
		||||
endif # CONFIG_WIN
 | 
			
		||||
 | 
			
		||||
# Add a dependency on the generated files, so that they are always
 | 
			
		||||
# rebuilt before other object files
 | 
			
		||||
ifneq ($(filter-out %clean,$(MAKECMDGOALS)),$(if $(MAKECMDGOALS),,fail))
 | 
			
		||||
Makefile: $(GENERATED_HEADERS)
 | 
			
		||||
endif
 | 
			
		||||
# generate a binary distribution
 | 
			
		||||
tarbin:
 | 
			
		||||
	cd / && tar zcvf ~/qemu-$(VERSION)-$(ARCH).tar.gz \
 | 
			
		||||
	$(bindir)/qemu \
 | 
			
		||||
	$(bindir)/qemu-system-x86_64 \
 | 
			
		||||
	$(bindir)/qemu-system-arm \
 | 
			
		||||
	$(bindir)/qemu-system-cris \
 | 
			
		||||
	$(bindir)/qemu-system-m68k \
 | 
			
		||||
	$(bindir)/qemu-system-mips \
 | 
			
		||||
	$(bindir)/qemu-system-mipsel \
 | 
			
		||||
	$(bindir)/qemu-system-mips64 \
 | 
			
		||||
	$(bindir)/qemu-system-mips64el \
 | 
			
		||||
	$(bindir)/qemu-system-ppc \
 | 
			
		||||
	$(bindir)/qemu-system-ppcemb \
 | 
			
		||||
	$(bindir)/qemu-system-ppc64 \
 | 
			
		||||
	$(bindir)/qemu-system-sh4 \
 | 
			
		||||
	$(bindir)/qemu-system-sh4eb \
 | 
			
		||||
	$(bindir)/qemu-system-sparc \
 | 
			
		||||
	$(bindir)/qemu-i386 \
 | 
			
		||||
	$(bindir)/qemu-x86_64 \
 | 
			
		||||
	$(bindir)/qemu-alpha \
 | 
			
		||||
	$(bindir)/qemu-arm \
 | 
			
		||||
	$(bindir)/qemu-armeb \
 | 
			
		||||
	$(bindir)/qemu-cris \
 | 
			
		||||
	$(bindir)/qemu-m68k \
 | 
			
		||||
	$(bindir)/qemu-mips \
 | 
			
		||||
	$(bindir)/qemu-mipsel \
 | 
			
		||||
	$(bindir)/qemu-ppc \
 | 
			
		||||
	$(bindir)/qemu-ppc64 \
 | 
			
		||||
	$(bindir)/qemu-ppc64abi32 \
 | 
			
		||||
	$(bindir)/qemu-sh4 \
 | 
			
		||||
	$(bindir)/qemu-sh4eb \
 | 
			
		||||
	$(bindir)/qemu-sparc \
 | 
			
		||||
	$(bindir)/qemu-sparc64 \
 | 
			
		||||
	$(bindir)/qemu-sparc32plus \
 | 
			
		||||
	$(bindir)/qemu-img \
 | 
			
		||||
	$(bindir)/qemu-nbd \
 | 
			
		||||
	$(datadir)/bios.bin \
 | 
			
		||||
	$(datadir)/vgabios.bin \
 | 
			
		||||
	$(datadir)/vgabios-cirrus.bin \
 | 
			
		||||
	$(datadir)/ppc_rom.bin \
 | 
			
		||||
	$(datadir)/video.x \
 | 
			
		||||
	$(datadir)/openbios-sparc32 \
 | 
			
		||||
	$(datadir)/openbios-sparc64 \
 | 
			
		||||
	$(datadir)/openbios-ppc \
 | 
			
		||||
	$(datadir)/pxe-ne2k_pci.bin \
 | 
			
		||||
	$(datadir)/pxe-rtl8139.bin \
 | 
			
		||||
	$(datadir)/pxe-pcnet.bin \
 | 
			
		||||
	$(datadir)/pxe-e1000.bin \
 | 
			
		||||
	$(docdir)/qemu-doc.html \
 | 
			
		||||
	$(docdir)/qemu-tech.html \
 | 
			
		||||
	$(mandir)/man1/qemu.1 \
 | 
			
		||||
	$(mandir)/man1/qemu-img.1 \
 | 
			
		||||
	$(mandir)/man8/qemu-nbd.8
 | 
			
		||||
 | 
			
		||||
# Include automatically generated dependency files
 | 
			
		||||
# Dependencies in Makefile.objs files come from our recursive subdir rules
 | 
			
		||||
-include $(wildcard *.d tests/*.d)
 | 
			
		||||
-include $(wildcard *.d audio/*.d slirp/*.d)
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										115
									
								
								Makefile.objs
									
									
									
									
									
								
							
							
						
						
									
										115
									
								
								Makefile.objs
									
									
									
									
									
								
							@@ -1,115 +0,0 @@
 | 
			
		||||
#######################################################################
 | 
			
		||||
# Common libraries for tools and emulators
 | 
			
		||||
stub-obj-y = stubs/
 | 
			
		||||
util-obj-y = util/ qobject/ qapi/ trace/
 | 
			
		||||
 | 
			
		||||
#######################################################################
 | 
			
		||||
# block-obj-y is code used by both qemu system emulation and qemu-img
 | 
			
		||||
 | 
			
		||||
block-obj-y = async.o thread-pool.o
 | 
			
		||||
block-obj-y += nbd.o block.o blockjob.o
 | 
			
		||||
block-obj-y += main-loop.o iohandler.o qemu-timer.o
 | 
			
		||||
block-obj-$(CONFIG_POSIX) += aio-posix.o
 | 
			
		||||
block-obj-$(CONFIG_WIN32) += aio-win32.o
 | 
			
		||||
block-obj-y += block/
 | 
			
		||||
block-obj-y += qapi-types.o qapi-visit.o qapi-event.o
 | 
			
		||||
block-obj-y += qemu-io-cmds.o
 | 
			
		||||
 | 
			
		||||
block-obj-y += qemu-coroutine.o qemu-coroutine-lock.o qemu-coroutine-io.o
 | 
			
		||||
block-obj-y += qemu-coroutine-sleep.o
 | 
			
		||||
block-obj-y += coroutine-$(CONFIG_COROUTINE_BACKEND).o
 | 
			
		||||
 | 
			
		||||
block-obj-m = block/
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# smartcard
 | 
			
		||||
 | 
			
		||||
libcacard-y += libcacard/cac.o libcacard/event.o
 | 
			
		||||
libcacard-y += libcacard/vcard.o libcacard/vreader.o
 | 
			
		||||
libcacard-y += libcacard/vcard_emul_nss.o
 | 
			
		||||
libcacard-y += libcacard/vcard_emul_type.o
 | 
			
		||||
libcacard-y += libcacard/card_7816.o
 | 
			
		||||
libcacard-y += libcacard/vcardt.o
 | 
			
		||||
libcacard/vcard_emul_nss.o-cflags := $(NSS_CFLAGS)
 | 
			
		||||
libcacard/vcard_emul_nss.o-libs := $(NSS_LIBS)
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# Target independent part of system emulation. The long term path is to
 | 
			
		||||
# suppress *all* target specific code in case of system emulation, i.e. a
 | 
			
		||||
# single QEMU executable should support all CPUs and machines.
 | 
			
		||||
 | 
			
		||||
ifeq ($(CONFIG_SOFTMMU),y)
 | 
			
		||||
common-obj-y = blockdev.o blockdev-nbd.o block/
 | 
			
		||||
common-obj-y += iothread.o
 | 
			
		||||
common-obj-y += net/
 | 
			
		||||
common-obj-y += qdev-monitor.o device-hotplug.o
 | 
			
		||||
common-obj-$(CONFIG_WIN32) += os-win32.o
 | 
			
		||||
common-obj-$(CONFIG_POSIX) += os-posix.o
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_LINUX) += fsdev/
 | 
			
		||||
 | 
			
		||||
common-obj-y += migration.o migration-tcp.o
 | 
			
		||||
common-obj-y += vmstate.o
 | 
			
		||||
common-obj-y += qemu-file.o
 | 
			
		||||
common-obj-$(CONFIG_RDMA) += migration-rdma.o
 | 
			
		||||
common-obj-y += qemu-char.o #aio.o
 | 
			
		||||
common-obj-y += block-migration.o
 | 
			
		||||
common-obj-y += page_cache.o xbzrle.o
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_POSIX) += migration-exec.o migration-unix.o migration-fd.o
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_SPICE) += spice-qemu-char.o
 | 
			
		||||
 | 
			
		||||
common-obj-y += audio/
 | 
			
		||||
common-obj-y += hw/
 | 
			
		||||
 | 
			
		||||
common-obj-y += ui/
 | 
			
		||||
common-obj-y += bt-host.o bt-vhci.o
 | 
			
		||||
bt-host.o-cflags := $(BLUEZ_CFLAGS)
 | 
			
		||||
 | 
			
		||||
common-obj-y += dma-helpers.o
 | 
			
		||||
common-obj-y += vl.o
 | 
			
		||||
vl.o-cflags := $(GPROF_CFLAGS) $(SDL_CFLAGS)
 | 
			
		||||
common-obj-y += tpm.o
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_SLIRP) += slirp/
 | 
			
		||||
 | 
			
		||||
common-obj-y += backends/
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_SECCOMP) += qemu-seccomp.o
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_SMARTCARD_NSS) += $(libcacard-y)
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# qapi
 | 
			
		||||
 | 
			
		||||
common-obj-y += qmp-marshal.o
 | 
			
		||||
common-obj-y += qmp.o hmp.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# some qapi visitors are used by both system and user emulation:
 | 
			
		||||
 | 
			
		||||
common-obj-y += qapi-visit.o qapi-types.o
 | 
			
		||||
 | 
			
		||||
#######################################################################
 | 
			
		||||
# Target-independent parts used in system and user emulation
 | 
			
		||||
common-obj-y += qemu-log.o
 | 
			
		||||
common-obj-y += tcg-runtime.o
 | 
			
		||||
common-obj-y += hw/
 | 
			
		||||
common-obj-y += qom/
 | 
			
		||||
common-obj-y += disas/
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# Resource file for Windows executables
 | 
			
		||||
version-obj-$(CONFIG_WIN32) += $(BUILD_DIR)/version.o
 | 
			
		||||
version-lobj-$(CONFIG_WIN32) += $(BUILD_DIR)/version.lo
 | 
			
		||||
 | 
			
		||||
######################################################################
 | 
			
		||||
# guest agent
 | 
			
		||||
 | 
			
		||||
# FIXME: a few definitions from qapi-types.o/qapi-visit.o are needed
 | 
			
		||||
# by libqemuutil.a.  These should be moved to a separate .json schema.
 | 
			
		||||
qga-obj-y = qga/ qapi-types.o qapi-visit.o
 | 
			
		||||
qga-vss-dll-obj-y = qga/
 | 
			
		||||
							
								
								
									
										821
									
								
								Makefile.target
									
									
									
									
									
								
							
							
						
						
									
										821
									
								
								Makefile.target
									
									
									
									
									
								
							@@ -1,197 +1,752 @@
 | 
			
		||||
# -*- Mode: makefile -*-
 | 
			
		||||
 | 
			
		||||
include ../config-host.mak
 | 
			
		||||
include config-target.mak
 | 
			
		||||
include config-devices.mak
 | 
			
		||||
include config.mak
 | 
			
		||||
include $(SRC_PATH)/rules.mak
 | 
			
		||||
 | 
			
		||||
$(call set-vpath, $(SRC_PATH))
 | 
			
		||||
ifdef CONFIG_LINUX
 | 
			
		||||
QEMU_CFLAGS += -I../linux-headers
 | 
			
		||||
TARGET_BASE_ARCH:=$(TARGET_ARCH)
 | 
			
		||||
ifeq ($(TARGET_ARCH), x86_64)
 | 
			
		||||
TARGET_BASE_ARCH:=i386
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), mipsn32)
 | 
			
		||||
TARGET_BASE_ARCH:=mips
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), mips64)
 | 
			
		||||
TARGET_BASE_ARCH:=mips
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), ppc64)
 | 
			
		||||
TARGET_BASE_ARCH:=ppc
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), ppc64h)
 | 
			
		||||
TARGET_BASE_ARCH:=ppc
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), ppcemb)
 | 
			
		||||
TARGET_BASE_ARCH:=ppc
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), sparc64)
 | 
			
		||||
TARGET_BASE_ARCH:=sparc
 | 
			
		||||
endif
 | 
			
		||||
TARGET_PATH=$(SRC_PATH)/target-$(TARGET_BASE_ARCH)
 | 
			
		||||
VPATH=$(SRC_PATH):$(TARGET_PATH):$(SRC_PATH)/hw
 | 
			
		||||
CPPFLAGS=-I. -I.. -I$(TARGET_PATH) -I$(SRC_PATH) -MMD -MT $@ -MP -DNEED_CPU_H
 | 
			
		||||
#CFLAGS+=-Werror
 | 
			
		||||
LIBS=
 | 
			
		||||
# user emulator name
 | 
			
		||||
ifndef TARGET_ARCH2
 | 
			
		||||
TARGET_ARCH2=$(TARGET_ARCH)
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH),arm)
 | 
			
		||||
  ifeq ($(TARGET_WORDS_BIGENDIAN),yes)
 | 
			
		||||
    TARGET_ARCH2=armeb
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH),sh4)
 | 
			
		||||
  ifeq ($(TARGET_WORDS_BIGENDIAN),yes)
 | 
			
		||||
    TARGET_ARCH2=sh4eb
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH),mips)
 | 
			
		||||
  ifneq ($(TARGET_WORDS_BIGENDIAN),yes)
 | 
			
		||||
    TARGET_ARCH2=mipsel
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH),mipsn32)
 | 
			
		||||
  ifneq ($(TARGET_WORDS_BIGENDIAN),yes)
 | 
			
		||||
    TARGET_ARCH2=mipsn32el
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH),mips64)
 | 
			
		||||
  ifneq ($(TARGET_WORDS_BIGENDIAN),yes)
 | 
			
		||||
    TARGET_ARCH2=mips64el
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
QEMU_CFLAGS += -I.. -I$(SRC_PATH)/target-$(TARGET_BASE_ARCH) -DNEED_CPU_H
 | 
			
		||||
 | 
			
		||||
QEMU_CFLAGS+=-I$(SRC_PATH)/include
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_USER_ONLY
 | 
			
		||||
# user emulator name
 | 
			
		||||
QEMU_PROG=qemu-$(TARGET_NAME)
 | 
			
		||||
QEMU_PROG_BUILD = $(QEMU_PROG)
 | 
			
		||||
QEMU_PROG=qemu-$(TARGET_ARCH2)
 | 
			
		||||
else
 | 
			
		||||
# system emulator name
 | 
			
		||||
QEMU_PROG=qemu-system-$(TARGET_NAME)$(EXESUF)
 | 
			
		||||
ifneq (,$(findstring -mwindows,$(libs_softmmu)))
 | 
			
		||||
# Terminate program name with a 'w' because the linker builds a windows executable.
 | 
			
		||||
QEMU_PROGW=qemu-system-$(TARGET_NAME)w$(EXESUF)
 | 
			
		||||
$(QEMU_PROG): $(QEMU_PROGW)
 | 
			
		||||
	$(call quiet-command,$(OBJCOPY) --subsystem console $(QEMU_PROGW) $(QEMU_PROG),"  GEN   $(TARGET_DIR)$(QEMU_PROG)")
 | 
			
		||||
QEMU_PROG_BUILD = $(QEMU_PROGW)
 | 
			
		||||
ifeq ($(TARGET_ARCH), i386)
 | 
			
		||||
QEMU_PROG=qemu$(EXESUF)
 | 
			
		||||
else
 | 
			
		||||
QEMU_PROG_BUILD = $(QEMU_PROG)
 | 
			
		||||
QEMU_PROG=qemu-system-$(TARGET_ARCH2)$(EXESUF)
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
PROGS=$(QEMU_PROG) $(QEMU_PROGW)
 | 
			
		||||
STPFILES=
 | 
			
		||||
PROGS=$(QEMU_PROG)
 | 
			
		||||
 | 
			
		||||
config-target.h: config-target.h-timestamp
 | 
			
		||||
config-target.h-timestamp: config-target.mak
 | 
			
		||||
# cc-option
 | 
			
		||||
# Usage: CFLAGS+=$(call cc-option, $(CFLAGS), -falign-functions=0, -malign-functions=0)
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_TRACE_SYSTEMTAP
 | 
			
		||||
stap: $(QEMU_PROG).stp-installed $(QEMU_PROG).stp
 | 
			
		||||
cc-option = $(shell if $(CC) $(1) $(2) -S -o /dev/null -xc /dev/null \
 | 
			
		||||
              > /dev/null 2>&1; then echo "$(2)"; else echo "$(3)"; fi ;)
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_USER_ONLY
 | 
			
		||||
TARGET_TYPE=user
 | 
			
		||||
else
 | 
			
		||||
TARGET_TYPE=system
 | 
			
		||||
HELPER_CFLAGS=
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),i386)
 | 
			
		||||
HELPER_CFLAGS+=-fomit-frame-pointer
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG).stp-installed: $(SRC_PATH)/trace-events
 | 
			
		||||
	$(call quiet-command,$(TRACETOOL) \
 | 
			
		||||
		--format=stap \
 | 
			
		||||
		--backends=$(TRACE_BACKENDS) \
 | 
			
		||||
		--binary=$(bindir)/$(QEMU_PROG) \
 | 
			
		||||
		--target-name=$(TARGET_NAME) \
 | 
			
		||||
		--target-type=$(TARGET_TYPE) \
 | 
			
		||||
		< $< > $@,"  GEN   $(TARGET_DIR)$(QEMU_PROG).stp-installed")
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG).stp: $(SRC_PATH)/trace-events
 | 
			
		||||
	$(call quiet-command,$(TRACETOOL) \
 | 
			
		||||
		--format=stap \
 | 
			
		||||
		--backends=$(TRACE_BACKENDS) \
 | 
			
		||||
		--binary=$(realpath .)/$(QEMU_PROG) \
 | 
			
		||||
		--target-name=$(TARGET_NAME) \
 | 
			
		||||
		--target-type=$(TARGET_TYPE) \
 | 
			
		||||
		< $< > $@,"  GEN   $(TARGET_DIR)$(QEMU_PROG).stp")
 | 
			
		||||
 | 
			
		||||
else
 | 
			
		||||
stap:
 | 
			
		||||
ifeq ($(ARCH),sparc)
 | 
			
		||||
  CFLAGS+=-ffixed-g2 -ffixed-g3
 | 
			
		||||
  ifneq ($(CONFIG_SOLARIS),yes)
 | 
			
		||||
    CFLAGS+=-ffixed-g1 -ffixed-g6
 | 
			
		||||
    HELPER_CFLAGS+=-ffixed-i0
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
all: $(PROGS) stap
 | 
			
		||||
ifeq ($(ARCH),sparc64)
 | 
			
		||||
  ifneq ($(CONFIG_SOLARIS),yes)
 | 
			
		||||
    CFLAGS+=-ffixed-g5 -ffixed-g6 -ffixed-g7
 | 
			
		||||
  else
 | 
			
		||||
    CFLAGS+=-ffixed-g1 -ffixed-g4 -ffixed-g5 -ffixed-g7
 | 
			
		||||
  endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# Dummy command so that make thinks it has done something
 | 
			
		||||
	@true
 | 
			
		||||
ifeq ($(ARCH),alpha)
 | 
			
		||||
# Ensure there's only a single GP
 | 
			
		||||
CFLAGS+=-msmall-data
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),hppa)
 | 
			
		||||
BASE_LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ia64)
 | 
			
		||||
CFLAGS+=-mno-sdata
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
CFLAGS+=$(OS_CFLAGS) $(ARCH_CFLAGS)
 | 
			
		||||
LDFLAGS+=$(OS_LDFLAGS) $(ARCH_LDFLAGS)
 | 
			
		||||
 | 
			
		||||
CPPFLAGS+=-D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -D_LARGEFILE_SOURCE
 | 
			
		||||
LIBS+=-lm
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
LIBS+=-lwinmm -lws2_32 -liphlpapi
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_SOLARIS
 | 
			
		||||
LIBS+=-lsocket -lnsl -lresolv
 | 
			
		||||
ifdef NEEDS_LIBSUNMATH
 | 
			
		||||
LIBS+=-lsunmath
 | 
			
		||||
LDFLAGS+=-L/opt/SUNWspro/prod/lib -R/opt/SUNWspro/prod/lib
 | 
			
		||||
CFLAGS+=-I/opt/SUNWspro/prod/include/cc
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
kvm.o: CFLAGS+=$(KVM_CFLAGS)
 | 
			
		||||
kvm-all.o: CFLAGS+=$(KVM_CFLAGS)
 | 
			
		||||
 | 
			
		||||
all: $(PROGS)
 | 
			
		||||
 | 
			
		||||
#########################################################
 | 
			
		||||
# cpu emulator library
 | 
			
		||||
obj-y = exec.o translate-all.o cpu-exec.o
 | 
			
		||||
obj-y += tcg/tcg.o tcg/optimize.o
 | 
			
		||||
obj-$(CONFIG_TCG_INTERPRETER) += tci.o
 | 
			
		||||
obj-$(CONFIG_TCG_INTERPRETER) += disas/tci.o
 | 
			
		||||
obj-y += fpu/softfloat.o
 | 
			
		||||
obj-y += target-$(TARGET_BASE_ARCH)/
 | 
			
		||||
obj-y += disas.o
 | 
			
		||||
obj-$(call notempty,$(TARGET_XML_FILES)) += gdbstub-xml.o
 | 
			
		||||
obj-$(call lnot,$(CONFIG_KVM)) += kvm-stub.o
 | 
			
		||||
LIBOBJS=exec.o kqemu.o translate-all.o cpu-exec.o\
 | 
			
		||||
        translate.o host-utils.o
 | 
			
		||||
# TCG code generator
 | 
			
		||||
LIBOBJS+= tcg/tcg.o tcg/tcg-runtime.o
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/tcg -I$(SRC_PATH)/tcg/$(ARCH)
 | 
			
		||||
ifeq ($(ARCH),sparc64)
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/tcg/sparc
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_SOFTFLOAT
 | 
			
		||||
LIBOBJS+=fpu/softfloat.o
 | 
			
		||||
else
 | 
			
		||||
LIBOBJS+=fpu/softfloat-native.o
 | 
			
		||||
endif
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/fpu
 | 
			
		||||
LIBOBJS+= op_helper.o helper.o
 | 
			
		||||
 | 
			
		||||
obj-$(CONFIG_LIBDECNUMBER) += libdecnumber/decContext.o
 | 
			
		||||
obj-$(CONFIG_LIBDECNUMBER) += libdecnumber/decNumber.o
 | 
			
		||||
obj-$(CONFIG_LIBDECNUMBER) += libdecnumber/dpd/decimal32.o
 | 
			
		||||
obj-$(CONFIG_LIBDECNUMBER) += libdecnumber/dpd/decimal64.o
 | 
			
		||||
obj-$(CONFIG_LIBDECNUMBER) += libdecnumber/dpd/decimal128.o
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), arm)
 | 
			
		||||
LIBOBJS+= neon_helper.o iwmmxt_helper.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), alpha)
 | 
			
		||||
LIBOBJS+= alpha_palcode.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), cris)
 | 
			
		||||
LIBOBJS+= cris-dis.o
 | 
			
		||||
 | 
			
		||||
ifndef CONFIG_USER_ONLY
 | 
			
		||||
LIBOBJS+= mmu.o
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# NOTE: the disassembler code is only needed for debugging
 | 
			
		||||
LIBOBJS+=disas.o
 | 
			
		||||
ifeq ($(findstring i386, $(TARGET_ARCH) $(ARCH)),i386)
 | 
			
		||||
USE_I386_DIS=y
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring x86_64, $(TARGET_ARCH) $(ARCH)),x86_64)
 | 
			
		||||
USE_I386_DIS=y
 | 
			
		||||
endif
 | 
			
		||||
ifdef USE_I386_DIS
 | 
			
		||||
LIBOBJS+=i386-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring alpha, $(TARGET_ARCH) $(ARCH)),alpha)
 | 
			
		||||
LIBOBJS+=alpha-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring ppc, $(TARGET_BASE_ARCH) $(ARCH)),ppc)
 | 
			
		||||
LIBOBJS+=ppc-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring mips, $(TARGET_BASE_ARCH) $(ARCH)),mips)
 | 
			
		||||
LIBOBJS+=mips-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring sparc, $(TARGET_BASE_ARCH) $(ARCH)),sparc)
 | 
			
		||||
LIBOBJS+=sparc-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring arm, $(TARGET_ARCH) $(ARCH)),arm)
 | 
			
		||||
LIBOBJS+=arm-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring m68k, $(TARGET_ARCH) $(ARCH)),m68k)
 | 
			
		||||
LIBOBJS+=m68k-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring sh4, $(TARGET_ARCH) $(ARCH)),sh4)
 | 
			
		||||
LIBOBJS+=sh4-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring hppa, $(TARGET_BASE_ARCH) $(ARCH)),hppa)
 | 
			
		||||
LIBOBJS+=hppa-dis.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(findstring s390, $(TARGET_ARCH) $(ARCH)),s390)
 | 
			
		||||
LIBOBJS+=s390-dis.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# libqemu
 | 
			
		||||
 | 
			
		||||
libqemu.a: $(LIBOBJS)
 | 
			
		||||
 | 
			
		||||
translate.o: translate.c cpu.h
 | 
			
		||||
 | 
			
		||||
translate-all.o: translate-all.c cpu.h
 | 
			
		||||
 | 
			
		||||
tcg/tcg.o: cpu.h
 | 
			
		||||
 | 
			
		||||
# HELPER_CFLAGS is used for all the code compiled with static register
 | 
			
		||||
# variables
 | 
			
		||||
op_helper.o: CFLAGS += $(HELPER_CFLAGS) $(I386_CFLAGS)
 | 
			
		||||
 | 
			
		||||
cpu-exec.o: CFLAGS += $(HELPER_CFLAGS)
 | 
			
		||||
 | 
			
		||||
#########################################################
 | 
			
		||||
# Linux user emulator target
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_LINUX_USER
 | 
			
		||||
 | 
			
		||||
QEMU_CFLAGS+=-I$(SRC_PATH)/linux-user/$(TARGET_ABI_DIR) -I$(SRC_PATH)/linux-user
 | 
			
		||||
ifndef TARGET_ABI_DIR
 | 
			
		||||
  TARGET_ABI_DIR=$(TARGET_ARCH)
 | 
			
		||||
endif
 | 
			
		||||
VPATH+=:$(SRC_PATH)/linux-user:$(SRC_PATH)/linux-user/$(TARGET_ABI_DIR)
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/linux-user -I$(SRC_PATH)/linux-user/$(TARGET_ABI_DIR)
 | 
			
		||||
 | 
			
		||||
obj-y += linux-user/
 | 
			
		||||
obj-y += gdbstub.o thunk.o user-exec.o
 | 
			
		||||
ifdef CONFIG_STATIC
 | 
			
		||||
LDFLAGS+=-static
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),i386)
 | 
			
		||||
ifdef TARGET_GPROF
 | 
			
		||||
USE_I386_LD=y
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_STATIC
 | 
			
		||||
USE_I386_LD=y
 | 
			
		||||
endif
 | 
			
		||||
ifdef USE_I386_LD
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
else
 | 
			
		||||
# WARNING: this LDFLAGS is _very_ tricky : qemu is an ELF shared object
 | 
			
		||||
# that the kernel ELF loader considers as an executable. I think this
 | 
			
		||||
# is the simplest way to make it self virtualizable!
 | 
			
		||||
LDFLAGS+=-Wl,-shared
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),x86_64)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ppc)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ppc64)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),s390)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),sparc)
 | 
			
		||||
# -static is used to avoid g1/g3 usage by the dynamic linker	
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld -static
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),sparc64)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),alpha)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ia64)
 | 
			
		||||
LDFLAGS+=-Wl,-G0 -Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),arm)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),m68k)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),mips)
 | 
			
		||||
ifeq ($(WORDS_BIGENDIAN),yes)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
else
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH)el.ld
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),mips64)
 | 
			
		||||
ifeq ($(WORDS_BIGENDIAN),yes)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
else
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH)el.ld
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# profiling code
 | 
			
		||||
ifdef TARGET_GPROF
 | 
			
		||||
LDFLAGS+=-p
 | 
			
		||||
CFLAGS+=-p
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
OBJS= main.o syscall.o strace.o mmap.o signal.o path.o thunk.o \
 | 
			
		||||
      elfload.o linuxload.o uaccess.o envlist.o
 | 
			
		||||
LIBS+= $(AIOLIBS)
 | 
			
		||||
ifdef TARGET_HAS_BFLT
 | 
			
		||||
OBJS+= flatload.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef TARGET_HAS_ELFLOAD32
 | 
			
		||||
OBJS+= elfload32.o
 | 
			
		||||
elfload32.o: elfload.c
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(TARGET_ARCH), i386)
 | 
			
		||||
OBJS+= vm86.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), arm)
 | 
			
		||||
OBJS+=nwfpe/fpa11.o nwfpe/fpa11_cpdo.o \
 | 
			
		||||
nwfpe/fpa11_cpdt.o nwfpe/fpa11_cprt.o nwfpe/fpopcode.o nwfpe/single_cpdo.o \
 | 
			
		||||
 nwfpe/double_cpdo.o nwfpe/extended_cpdo.o arm-semi.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_ARCH), m68k)
 | 
			
		||||
OBJS+= m68k-sim.o m68k-semi.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_GDBSTUB
 | 
			
		||||
OBJS+=gdbstub.o gdbstub-xml.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
OBJS+= libqemu.a
 | 
			
		||||
 | 
			
		||||
# Note: this is a workaround. The real fix is to avoid compiling
 | 
			
		||||
# cpu_signal_handler() in cpu-exec.c.
 | 
			
		||||
signal.o: CFLAGS += $(HELPER_CFLAGS)
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG): $(OBJS) ../libqemu_user.a
 | 
			
		||||
	$(LINK)
 | 
			
		||||
ifeq ($(ARCH),alpha)
 | 
			
		||||
# Mark as 32 bit binary, i. e. it will be mapped into the low 31 bit of
 | 
			
		||||
# the address space (31 bit so sign extending doesn't matter)
 | 
			
		||||
	echo -ne '\001\000\000\000' | dd of=qemu bs=1 seek=48 count=4 conv=notrunc
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
endif #CONFIG_LINUX_USER
 | 
			
		||||
 | 
			
		||||
#########################################################
 | 
			
		||||
# Darwin user emulator target
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_DARWIN_USER
 | 
			
		||||
 | 
			
		||||
VPATH+=:$(SRC_PATH)/darwin-user
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/darwin-user -I$(SRC_PATH)/darwin-user/$(TARGET_ARCH)
 | 
			
		||||
 | 
			
		||||
# Leave some space for the regular program loading zone
 | 
			
		||||
LDFLAGS+=-Wl,-segaddr,__STD_PROG_ZONE,0x1000 -image_base 0x0e000000
 | 
			
		||||
 | 
			
		||||
LIBS+=-lmx
 | 
			
		||||
 | 
			
		||||
OBJS= main.o commpage.o machload.o mmap.o signal.o syscall.o thunk.o
 | 
			
		||||
 | 
			
		||||
OBJS+= libqemu.a
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_GDBSTUB
 | 
			
		||||
OBJS+=gdbstub.o gdbstub-xml.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# Note: this is a workaround. The real fix is to avoid compiling
 | 
			
		||||
# cpu_signal_handler() in cpu-exec.c.
 | 
			
		||||
signal.o: CFLAGS += $(HELPER_CFLAGS)
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG): $(OBJS)
 | 
			
		||||
	$(LINK)
 | 
			
		||||
 | 
			
		||||
endif #CONFIG_DARWIN_USER
 | 
			
		||||
 | 
			
		||||
#########################################################
 | 
			
		||||
# BSD user emulator target
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_BSD_USER
 | 
			
		||||
 | 
			
		||||
QEMU_CFLAGS+=-I$(SRC_PATH)/bsd-user -I$(SRC_PATH)/bsd-user/$(TARGET_ABI_DIR) \
 | 
			
		||||
			 -I$(SRC_PATH)/bsd-user/$(HOST_VARIANT_DIR)
 | 
			
		||||
VPATH+=:$(SRC_PATH)/bsd-user
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/bsd-user -I$(SRC_PATH)/bsd-user/$(TARGET_ARCH)
 | 
			
		||||
 | 
			
		||||
obj-y += bsd-user/
 | 
			
		||||
obj-y += gdbstub.o user-exec.o
 | 
			
		||||
ifdef CONFIG_STATIC
 | 
			
		||||
LDFLAGS+=-static
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),i386)
 | 
			
		||||
ifdef TARGET_GPROF
 | 
			
		||||
USE_I386_LD=y
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_STATIC
 | 
			
		||||
USE_I386_LD=y
 | 
			
		||||
endif
 | 
			
		||||
ifdef USE_I386_LD
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
else
 | 
			
		||||
# WARNING: this LDFLAGS is _very_ tricky : qemu is an ELF shared object
 | 
			
		||||
# that the kernel ELF loader considers as an executable. I think this
 | 
			
		||||
# is the simplest way to make it self virtualizable!
 | 
			
		||||
LDFLAGS+=-Wl,-shared
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),x86_64)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ppc)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ppc64)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),s390)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),sparc)
 | 
			
		||||
# -static is used to avoid g1/g3 usage by the dynamic linker
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld -static
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),sparc64)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),alpha)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ia64)
 | 
			
		||||
LDFLAGS+=-Wl,-G0 -Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),arm)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),m68k)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),mips)
 | 
			
		||||
ifeq ($(WORDS_BIGENDIAN),yes)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
else
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH)el.ld
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),mips64)
 | 
			
		||||
ifeq ($(WORDS_BIGENDIAN),yes)
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH).ld
 | 
			
		||||
else
 | 
			
		||||
LDFLAGS+=-Wl,-T,$(SRC_PATH)/$(ARCH)el.ld
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
OBJS= main.o bsdload.o elfload.o mmap.o path.o signal.o strace.o syscall.o
 | 
			
		||||
OBJS+= uaccess.o
 | 
			
		||||
 | 
			
		||||
OBJS+= libqemu.a
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_GDBSTUB
 | 
			
		||||
OBJS+=gdbstub.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# Note: this is a workaround. The real fix is to avoid compiling
 | 
			
		||||
# cpu_signal_handler() in cpu-exec.c.
 | 
			
		||||
signal.o: CFLAGS += $(HELPER_CFLAGS)
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG): $(OBJS) ../libqemu_user.a
 | 
			
		||||
	$(LINK)
 | 
			
		||||
 | 
			
		||||
endif #CONFIG_BSD_USER
 | 
			
		||||
 | 
			
		||||
#########################################################
 | 
			
		||||
# System emulator target
 | 
			
		||||
ifdef CONFIG_SOFTMMU
 | 
			
		||||
obj-y += arch_init.o cpus.o monitor.o gdbstub.o balloon.o ioport.o numa.o
 | 
			
		||||
obj-y += qtest.o
 | 
			
		||||
obj-y += hw/
 | 
			
		||||
obj-$(CONFIG_FDT) += device_tree.o
 | 
			
		||||
obj-$(CONFIG_KVM) += kvm-all.o
 | 
			
		||||
obj-y += memory.o savevm.o cputlb.o
 | 
			
		||||
obj-y += memory_mapping.o
 | 
			
		||||
obj-y += dump.o
 | 
			
		||||
LIBS+=$(libs_softmmu)
 | 
			
		||||
ifndef CONFIG_USER_ONLY
 | 
			
		||||
 | 
			
		||||
# xen support
 | 
			
		||||
obj-$(CONFIG_XEN) += xen-common.o
 | 
			
		||||
obj-$(CONFIG_XEN_I386) += xen-hvm.o xen-mapcache.o
 | 
			
		||||
obj-$(call lnot,$(CONFIG_XEN)) += xen-common-stub.o
 | 
			
		||||
obj-$(call lnot,$(CONFIG_XEN_I386)) += xen-hvm-stub.o
 | 
			
		||||
 | 
			
		||||
# Hardware support
 | 
			
		||||
ifeq ($(TARGET_NAME), sparc64)
 | 
			
		||||
obj-y += hw/sparc64/
 | 
			
		||||
OBJS=vl.o osdep.o monitor.o pci.o loader.o isa_mmio.o machine.o dma-helpers.o
 | 
			
		||||
# virtio has to be here due to weird dependency between PCI and virtio-net.
 | 
			
		||||
# need to fix this properly
 | 
			
		||||
OBJS+=virtio.o virtio-blk.o virtio-balloon.o virtio-net.o virtio-console.o
 | 
			
		||||
OBJS+=fw_cfg.o
 | 
			
		||||
ifdef CONFIG_KVM
 | 
			
		||||
OBJS+=kvm.o kvm-all.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
OBJS+=block-raw-win32.o
 | 
			
		||||
else
 | 
			
		||||
obj-y += hw/$(TARGET_BASE_ARCH)/
 | 
			
		||||
ifdef CONFIG_AIO
 | 
			
		||||
OBJS+=posix-aio-compat.o
 | 
			
		||||
endif
 | 
			
		||||
OBJS+=block-raw-posix.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
GENERATED_HEADERS += hmp-commands.h qmp-commands-old.h
 | 
			
		||||
LIBS+=-lz
 | 
			
		||||
ifdef CONFIG_ALSA
 | 
			
		||||
LIBS += -lasound
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_ESD
 | 
			
		||||
LIBS += -lesd
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_PA
 | 
			
		||||
LIBS += -lpulse-simple
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_DSOUND
 | 
			
		||||
LIBS += -lole32 -ldxguid
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_FMOD
 | 
			
		||||
LIBS += $(CONFIG_FMOD_LIB)
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_OSS
 | 
			
		||||
LIBS += $(CONFIG_OSS_LIB)
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
endif # CONFIG_SOFTMMU
 | 
			
		||||
SOUND_HW = sb16.o es1370.o ac97.o
 | 
			
		||||
ifdef CONFIG_ADLIB
 | 
			
		||||
SOUND_HW += fmopl.o adlib.o
 | 
			
		||||
adlib.o fmopl.o: CFLAGS := ${CFLAGS} -DBUILD_Y8950=0
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_GUS
 | 
			
		||||
SOUND_HW += gus.o gusemu_hal.o gusemu_mixer.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_CS4231A
 | 
			
		||||
SOUND_HW += cs4231a.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# Workaround for http://gcc.gnu.org/PR55489, see configure.
 | 
			
		||||
%/translate.o: QEMU_CFLAGS += $(TRANSLATE_OPT_CFLAGS)
 | 
			
		||||
ifdef CONFIG_VNC_TLS
 | 
			
		||||
CPPFLAGS += $(CONFIG_VNC_TLS_CFLAGS)
 | 
			
		||||
LIBS += $(CONFIG_VNC_TLS_LIBS)
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
dummy := $(call unnest-vars,,obj-y)
 | 
			
		||||
all-obj-y := $(obj-y)
 | 
			
		||||
ifdef CONFIG_BLUEZ
 | 
			
		||||
LIBS += $(CONFIG_BLUEZ_LIBS)
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
block-obj-y :=
 | 
			
		||||
common-obj-y :=
 | 
			
		||||
include $(SRC_PATH)/Makefile.objs
 | 
			
		||||
dummy := $(call unnest-vars,.., \
 | 
			
		||||
               block-obj-y \
 | 
			
		||||
               block-obj-m \
 | 
			
		||||
               common-obj-y \
 | 
			
		||||
               common-obj-m)
 | 
			
		||||
all-obj-y += $(common-obj-y)
 | 
			
		||||
all-obj-$(CONFIG_SOFTMMU) += $(block-obj-y)
 | 
			
		||||
# SCSI layer
 | 
			
		||||
OBJS+= lsi53c895a.o esp.o
 | 
			
		||||
 | 
			
		||||
# build either PROG or PROGW
 | 
			
		||||
$(QEMU_PROG_BUILD): $(all-obj-y) ../libqemuutil.a ../libqemustub.a
 | 
			
		||||
	$(call LINK,$^)
 | 
			
		||||
# USB layer
 | 
			
		||||
OBJS+= usb-ohci.o
 | 
			
		||||
 | 
			
		||||
gdbstub-xml.c: $(TARGET_XML_FILES) $(SRC_PATH)/scripts/feature_to_c.sh
 | 
			
		||||
	$(call quiet-command,rm -f $@ && $(SHELL) $(SRC_PATH)/scripts/feature_to_c.sh $@ $(TARGET_XML_FILES),"  GEN   $(TARGET_DIR)$@")
 | 
			
		||||
# EEPROM emulation
 | 
			
		||||
OBJS += eeprom93xx.o
 | 
			
		||||
 | 
			
		||||
hmp-commands.h: $(SRC_PATH)/hmp-commands.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -h < $< > $@,"  GEN   $(TARGET_DIR)$@")
 | 
			
		||||
# PCI network cards
 | 
			
		||||
OBJS += eepro100.o
 | 
			
		||||
OBJS += ne2000.o
 | 
			
		||||
OBJS += pcnet.o
 | 
			
		||||
OBJS += rtl8139.o
 | 
			
		||||
OBJS += e1000.o
 | 
			
		||||
 | 
			
		||||
qmp-commands-old.h: $(SRC_PATH)/qmp-commands.hx
 | 
			
		||||
	$(call quiet-command,sh $(SRC_PATH)/scripts/hxtool -h < $< > $@,"  GEN   $(TARGET_DIR)$@")
 | 
			
		||||
# Serial mouse
 | 
			
		||||
OBJS += msmouse.o
 | 
			
		||||
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), i386)
 | 
			
		||||
# Hardware support
 | 
			
		||||
OBJS+= ide.o pckbd.o ps2.o vga.o $(SOUND_HW) dma.o
 | 
			
		||||
OBJS+= fdc.o mc146818rtc.o serial.o i8259.o i8254.o pcspk.o pc.o
 | 
			
		||||
OBJS+= cirrus_vga.o apic.o parallel.o acpi.o piix_pci.o
 | 
			
		||||
OBJS+= usb-uhci.o vmmouse.o vmport.o vmware_vga.o hpet.o
 | 
			
		||||
OBJS += device-hotplug.o pci-hotplug.o
 | 
			
		||||
CPPFLAGS += -DHAS_AUDIO -DHAS_AUDIO_CHOICE
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), ppc)
 | 
			
		||||
CPPFLAGS += -DHAS_AUDIO -DHAS_AUDIO_CHOICE
 | 
			
		||||
# shared objects
 | 
			
		||||
OBJS+= ppc.o ide.o vga.o $(SOUND_HW) dma.o openpic.o
 | 
			
		||||
# PREP target
 | 
			
		||||
OBJS+= pckbd.o ps2.o serial.o i8259.o i8254.o fdc.o m48t59.o mc146818rtc.o
 | 
			
		||||
OBJS+= prep_pci.o ppc_prep.o
 | 
			
		||||
# Mac shared devices
 | 
			
		||||
OBJS+= macio.o cuda.o adb.o mac_nvram.o mac_dbdma.o escc.o
 | 
			
		||||
# OldWorld PowerMac
 | 
			
		||||
OBJS+= heathrow_pic.o grackle_pci.o ppc_oldworld.o
 | 
			
		||||
# NewWorld PowerMac
 | 
			
		||||
OBJS+= unin_pci.o ppc_newworld.o
 | 
			
		||||
# PowerPC 4xx boards
 | 
			
		||||
OBJS+= pflash_cfi02.o ppc4xx_devs.o ppc4xx_pci.o ppc405_uc.o ppc405_boards.o
 | 
			
		||||
OBJS+= ppc440.o ppc440_bamboo.o
 | 
			
		||||
# PowerPC E500 boards
 | 
			
		||||
OBJS+= ppce500_pci.o ppce500_mpc8544ds.o
 | 
			
		||||
ifdef FDT_LIBS
 | 
			
		||||
OBJS+= device_tree.o
 | 
			
		||||
LIBS+= $(FDT_LIBS)
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_KVM
 | 
			
		||||
OBJS+= kvm_ppc.o
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), mips)
 | 
			
		||||
OBJS+= mips_r4k.o mips_jazz.o mips_malta.o mips_mipssim.o
 | 
			
		||||
OBJS+= mips_timer.o mips_int.o dma.o vga.o serial.o i8254.o i8259.o rc4030.o
 | 
			
		||||
OBJS+= g364fb.o jazz_led.o
 | 
			
		||||
OBJS+= ide.o gt64xxx.o pckbd.o ps2.o fdc.o mc146818rtc.o usb-uhci.o acpi.o ds1225y.o
 | 
			
		||||
OBJS+= piix_pci.o parallel.o cirrus_vga.o pcspk.o $(SOUND_HW)
 | 
			
		||||
OBJS+= mipsnet.o
 | 
			
		||||
OBJS+= pflash_cfi01.o
 | 
			
		||||
OBJS+= vmware_vga.o
 | 
			
		||||
CPPFLAGS += -DHAS_AUDIO -DHAS_AUDIO_CHOICE
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), cris)
 | 
			
		||||
# Boards
 | 
			
		||||
OBJS+= etraxfs.o axis_dev88.o
 | 
			
		||||
 | 
			
		||||
# IO blocks
 | 
			
		||||
OBJS+= etraxfs_dma.o
 | 
			
		||||
OBJS+= etraxfs_pic.o
 | 
			
		||||
OBJS+= etraxfs_eth.o
 | 
			
		||||
OBJS+= etraxfs_timer.o
 | 
			
		||||
OBJS+= etraxfs_ser.o
 | 
			
		||||
 | 
			
		||||
OBJS+= ptimer.o
 | 
			
		||||
OBJS+= pflash_cfi02.o nand.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), sparc)
 | 
			
		||||
ifeq ($(TARGET_ARCH), sparc64)
 | 
			
		||||
OBJS+= sun4u.o ide.o pckbd.o ps2.o vga.o apb_pci.o
 | 
			
		||||
OBJS+= fdc.o mc146818rtc.o serial.o m48t59.o
 | 
			
		||||
OBJS+= cirrus_vga.o parallel.o ptimer.o
 | 
			
		||||
else
 | 
			
		||||
OBJS+= sun4m.o tcx.o pcnet.o iommu.o m48t59.o slavio_intctl.o
 | 
			
		||||
OBJS+= slavio_timer.o escc.o slavio_misc.o fdc.o sparc32_dma.o
 | 
			
		||||
OBJS+= cs4231.o ptimer.o eccmemctl.o sbi.o sun4c_intctl.o
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), arm)
 | 
			
		||||
OBJS+= integratorcp.o versatilepb.o ps2.o smc91c111.o arm_pic.o arm_timer.o
 | 
			
		||||
OBJS+= arm_boot.o pl011.o pl031.o pl050.o pl080.o pl110.o pl181.o pl190.o
 | 
			
		||||
OBJS+= versatile_pci.o ptimer.o
 | 
			
		||||
OBJS+= realview_gic.o realview.o arm_sysctl.o mpcore.o
 | 
			
		||||
OBJS+= armv7m.o armv7m_nvic.o stellaris.o pl022.o stellaris_enet.o
 | 
			
		||||
OBJS+= pl061.o
 | 
			
		||||
OBJS+= arm-semi.o
 | 
			
		||||
OBJS+= pxa2xx.o pxa2xx_pic.o pxa2xx_gpio.o pxa2xx_timer.o pxa2xx_dma.o
 | 
			
		||||
OBJS+= pxa2xx_lcd.o pxa2xx_mmci.o pxa2xx_pcmcia.o pxa2xx_keypad.o
 | 
			
		||||
OBJS+= pflash_cfi01.o gumstix.o
 | 
			
		||||
OBJS+= zaurus.o ide.o serial.o nand.o ecc.o spitz.o tosa.o tc6393xb.o
 | 
			
		||||
OBJS+= omap1.o omap_lcdc.o omap_dma.o omap_clk.o omap_mmc.o omap_i2c.o
 | 
			
		||||
OBJS+= omap2.o omap_dss.o soc_dma.o
 | 
			
		||||
OBJS+= omap_sx1.o palm.o tsc210x.o
 | 
			
		||||
OBJS+= nseries.o blizzard.o onenand.o vga.o cbus.o tusb6010.o usb-musb.o
 | 
			
		||||
OBJS+= tsc2005.o bt-hci-csr.o
 | 
			
		||||
OBJS+= mst_fpga.o mainstone.o
 | 
			
		||||
OBJS+= musicpal.o pflash_cfi02.o
 | 
			
		||||
CPPFLAGS += -DHAS_AUDIO
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), sh4)
 | 
			
		||||
OBJS+= shix.o r2d.o sh7750.o sh7750_regnames.o tc58128.o
 | 
			
		||||
OBJS+= sh_timer.o ptimer.o sh_serial.o sh_intc.o sh_pci.o sm501.o serial.o
 | 
			
		||||
OBJS+= ide.o
 | 
			
		||||
endif
 | 
			
		||||
ifeq ($(TARGET_BASE_ARCH), m68k)
 | 
			
		||||
OBJS+= an5206.o mcf5206.o ptimer.o mcf_uart.o mcf_intc.o mcf5208.o mcf_fec.o
 | 
			
		||||
OBJS+= m68k-semi.o dummy_m68k.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_GDBSTUB
 | 
			
		||||
OBJS+=gdbstub.o gdbstub-xml.o
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_COCOA
 | 
			
		||||
COCOA_LIBS=-F/System/Library/Frameworks -framework Cocoa -framework IOKit
 | 
			
		||||
ifdef CONFIG_COREAUDIO
 | 
			
		||||
COCOA_LIBS+=-framework CoreAudio
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_SLIRP
 | 
			
		||||
CPPFLAGS+=-I$(SRC_PATH)/slirp
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
LIBS+=$(AIOLIBS)
 | 
			
		||||
# specific flags are needed for non soft mmu emulator
 | 
			
		||||
ifdef CONFIG_STATIC
 | 
			
		||||
LDFLAGS+=-static
 | 
			
		||||
endif
 | 
			
		||||
ifndef CONFIG_DARWIN
 | 
			
		||||
ifndef CONFIG_WIN32
 | 
			
		||||
ifndef CONFIG_SOLARIS
 | 
			
		||||
ifndef CONFIG_AIX
 | 
			
		||||
LIBS+=-lutil
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
endif
 | 
			
		||||
ifdef TARGET_GPROF
 | 
			
		||||
vl.o: CFLAGS+=-p
 | 
			
		||||
LDFLAGS+=-p
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifeq ($(ARCH),ia64)
 | 
			
		||||
LDFLAGS+=-Wl,-G0 -Wl,-T,$(SRC_PATH)/ia64.ld
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
ifdef CONFIG_WIN32
 | 
			
		||||
SDL_LIBS := $(filter-out -mwindows, $(SDL_LIBS)) -mconsole
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
# profiling code
 | 
			
		||||
ifdef TARGET_GPROF
 | 
			
		||||
LDFLAGS+=-p
 | 
			
		||||
main.o: CFLAGS+=-p
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG): LIBS += $(SDL_LIBS) $(COCOA_LIBS) $(CURSES_LIBS) $(BRLAPI_LIBS) $(VDE_LIBS)
 | 
			
		||||
 | 
			
		||||
$(QEMU_PROG): $(OBJS) ../libqemu_common.a libqemu.a
 | 
			
		||||
	$(LINK)
 | 
			
		||||
 | 
			
		||||
endif # !CONFIG_USER_ONLY
 | 
			
		||||
 | 
			
		||||
gdbstub-xml.c: $(TARGET_XML_FILES) feature_to_c.sh
 | 
			
		||||
	rm -f $@
 | 
			
		||||
ifeq ($(TARGET_XML_FILES),)
 | 
			
		||||
	echo > $@
 | 
			
		||||
else
 | 
			
		||||
	$(SHELL) $(SRC_PATH)/feature_to_c.sh $@ $(TARGET_XML_FILES)
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
clean:
 | 
			
		||||
	rm -f *.a *~ $(PROGS)
 | 
			
		||||
	rm -f $(shell find . -name '*.[od]')
 | 
			
		||||
	rm -f hmp-commands.h qmp-commands-old.h gdbstub-xml.c
 | 
			
		||||
ifdef CONFIG_TRACE_SYSTEMTAP
 | 
			
		||||
	rm -f *.stp
 | 
			
		||||
endif
 | 
			
		||||
	rm -f *.o *.a *~ $(PROGS) nwfpe/*.o fpu/*.o
 | 
			
		||||
	rm -f *.d */*.d tcg/*.o
 | 
			
		||||
 | 
			
		||||
install: all
 | 
			
		||||
ifneq ($(PROGS),)
 | 
			
		||||
	$(call install-prog,$(PROGS),$(DESTDIR)$(bindir))
 | 
			
		||||
endif
 | 
			
		||||
ifdef CONFIG_TRACE_SYSTEMTAP
 | 
			
		||||
	$(INSTALL_DIR) "$(DESTDIR)$(qemu_datadir)/../systemtap/tapset"
 | 
			
		||||
	$(INSTALL_DATA) $(QEMU_PROG).stp-installed "$(DESTDIR)$(qemu_datadir)/../systemtap/tapset/$(QEMU_PROG).stp"
 | 
			
		||||
	$(INSTALL) -m 755 -s $(PROGS) "$(DESTDIR)$(bindir)"
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
GENERATED_HEADERS += config-target.h
 | 
			
		||||
Makefile: $(GENERATED_HEADERS)
 | 
			
		||||
# Include automatically generated dependency files
 | 
			
		||||
-include $(wildcard *.d */*.d)
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										4
									
								
								README
									
									
									
									
									
								
							
							
						
						
									
										4
									
								
								README
									
									
									
									
									
								
							@@ -1,3 +1,3 @@
 | 
			
		||||
Read the documentation in qemu-doc.html or on http://wiki.qemu-project.org
 | 
			
		||||
Read the documentation in qemu-doc.html.
 | 
			
		||||
 | 
			
		||||
- QEMU team
 | 
			
		||||
Fabrice Bellard.
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										37
									
								
								TODO
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										37
									
								
								TODO
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,37 @@
 | 
			
		||||
General:
 | 
			
		||||
-------
 | 
			
		||||
- cycle counter for all archs
 | 
			
		||||
- cpu_interrupt() win32/SMP fix
 | 
			
		||||
- merge PIC spurious interrupt patch
 | 
			
		||||
- warning for OS/2: must not use 128 MB memory (merge bochs cmos patch ?)
 | 
			
		||||
- config file (at least for windows/Mac OS X)
 | 
			
		||||
- update doc: PCI infos.
 | 
			
		||||
- basic VGA optimizations
 | 
			
		||||
- better code fetch
 | 
			
		||||
- do not resize vga if invalid size.
 | 
			
		||||
- TLB code protection support for PPC
 | 
			
		||||
- disable SMC handling for ARM/SPARC/PPC (not finished)
 | 
			
		||||
- see undefined flags for BTx insn
 | 
			
		||||
- keyboard output buffer filling timing emulation
 | 
			
		||||
- tests for each target CPU
 | 
			
		||||
- fix all remaining thread lock issues (must put TBs in a specific invalid
 | 
			
		||||
  state, find a solution for tb_flush()).
 | 
			
		||||
 | 
			
		||||
ppc specific:
 | 
			
		||||
------------
 | 
			
		||||
- TLB invalidate not needed if msr_pr changes
 | 
			
		||||
- enable shift optimizations ?
 | 
			
		||||
 | 
			
		||||
linux-user specific:
 | 
			
		||||
-------------------
 | 
			
		||||
- remove threading support as it cannot work at this point
 | 
			
		||||
- improve IPC syscalls
 | 
			
		||||
- more syscalls (in particular all 64 bit ones, IPCs, fix 64 bit
 | 
			
		||||
  issues, fix 16 bit uid issues)
 | 
			
		||||
- use kernel traps for unaligned accesses on ARM ?
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
lower priority:
 | 
			
		||||
--------------
 | 
			
		||||
- int15 ah=86: use better timing
 | 
			
		||||
- use -msoft-float on ARM
 | 
			
		||||
							
								
								
									
										430
									
								
								a.out.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										430
									
								
								a.out.h
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,430 @@
 | 
			
		||||
/* a.out.h
 | 
			
		||||
 | 
			
		||||
   Copyright 1997, 1998, 1999, 2001 Red Hat, Inc.
 | 
			
		||||
 | 
			
		||||
This file is part of Cygwin.
 | 
			
		||||
 | 
			
		||||
This software is a copyrighted work licensed under the terms of the
 | 
			
		||||
Cygwin license.  Please consult the file "CYGWIN_LICENSE" for
 | 
			
		||||
details. */
 | 
			
		||||
 | 
			
		||||
#ifndef _A_OUT_H_
 | 
			
		||||
#define _A_OUT_H_
 | 
			
		||||
 | 
			
		||||
#ifdef __cplusplus
 | 
			
		||||
extern "C" {
 | 
			
		||||
#endif
 | 
			
		||||
#define COFF_IMAGE_WITH_PE
 | 
			
		||||
#define COFF_LONG_SECTION_NAMES
 | 
			
		||||
 | 
			
		||||
/*** coff information for Intel 386/486.  */
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/********************** FILE HEADER **********************/
 | 
			
		||||
 | 
			
		||||
struct external_filehdr {
 | 
			
		||||
  short f_magic;	/* magic number			*/
 | 
			
		||||
  short f_nscns;	/* number of sections		*/
 | 
			
		||||
  host_ulong f_timdat;	/* time & date stamp		*/
 | 
			
		||||
  host_ulong f_symptr;	/* file pointer to symtab	*/
 | 
			
		||||
  host_ulong f_nsyms;	/* number of symtab entries	*/
 | 
			
		||||
  short f_opthdr;	/* sizeof(optional hdr)		*/
 | 
			
		||||
  short f_flags;	/* flags			*/
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
/* Bits for f_flags:
 | 
			
		||||
 *	F_RELFLG	relocation info stripped from file
 | 
			
		||||
 *	F_EXEC		file is executable (no unresolved external references)
 | 
			
		||||
 *	F_LNNO		line numbers stripped from file
 | 
			
		||||
 *	F_LSYMS		local symbols stripped from file
 | 
			
		||||
 *	F_AR32WR	file has byte ordering of an AR32WR machine (e.g. vax)
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#define F_RELFLG	(0x0001)
 | 
			
		||||
#define F_EXEC		(0x0002)
 | 
			
		||||
#define F_LNNO		(0x0004)
 | 
			
		||||
#define F_LSYMS		(0x0008)
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
#define	I386MAGIC	0x14c
 | 
			
		||||
#define I386PTXMAGIC	0x154
 | 
			
		||||
#define I386AIXMAGIC	0x175
 | 
			
		||||
 | 
			
		||||
/* This is Lynx's all-platform magic number for executables. */
 | 
			
		||||
 | 
			
		||||
#define LYNXCOFFMAGIC	0415
 | 
			
		||||
 | 
			
		||||
#define I386BADMAG(x) (((x).f_magic != I386MAGIC) \
 | 
			
		||||
		       && (x).f_magic != I386AIXMAGIC \
 | 
			
		||||
		       && (x).f_magic != I386PTXMAGIC \
 | 
			
		||||
		       && (x).f_magic != LYNXCOFFMAGIC)
 | 
			
		||||
 | 
			
		||||
#define	FILHDR	struct external_filehdr
 | 
			
		||||
#define	FILHSZ	20
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/********************** AOUT "OPTIONAL HEADER"=
 | 
			
		||||
 **********************/
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
typedef struct
 | 
			
		||||
{
 | 
			
		||||
  unsigned short magic;		/* type of file				*/
 | 
			
		||||
  unsigned short vstamp;	/* version stamp			*/
 | 
			
		||||
  host_ulong	tsize;		/* text size in bytes, padded to FW bdry*/
 | 
			
		||||
  host_ulong	dsize;		/* initialized data "  "		*/
 | 
			
		||||
  host_ulong	bsize;		/* uninitialized data "   "		*/
 | 
			
		||||
  host_ulong	entry;		/* entry pt.				*/
 | 
			
		||||
  host_ulong text_start;	/* base of text used for this file */
 | 
			
		||||
  host_ulong data_start;	/* base of data used for this file=
 | 
			
		||||
 */
 | 
			
		||||
}
 | 
			
		||||
AOUTHDR;
 | 
			
		||||
 | 
			
		||||
#define AOUTSZ 28
 | 
			
		||||
#define AOUTHDRSZ 28
 | 
			
		||||
 | 
			
		||||
#define OMAGIC          0404    /* object files, eg as output */
 | 
			
		||||
#define ZMAGIC          0413    /* demand load format, eg normal ld output */
 | 
			
		||||
#define STMAGIC		0401	/* target shlib */
 | 
			
		||||
#define SHMAGIC		0443	/* host   shlib */
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/* define some NT default values */
 | 
			
		||||
/*  #define NT_IMAGE_BASE        0x400000 moved to internal.h */
 | 
			
		||||
#define NT_SECTION_ALIGNMENT 0x1000
 | 
			
		||||
#define NT_FILE_ALIGNMENT    0x200
 | 
			
		||||
#define NT_DEF_RESERVE       0x100000
 | 
			
		||||
#define NT_DEF_COMMIT        0x1000
 | 
			
		||||
 | 
			
		||||
/********************** SECTION HEADER **********************/
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
struct external_scnhdr {
 | 
			
		||||
  char		s_name[8];	/* section name			*/
 | 
			
		||||
  host_ulong	s_paddr;	/* physical address, offset
 | 
			
		||||
				   of last addr in scn */
 | 
			
		||||
  host_ulong	s_vaddr;	/* virtual address		*/
 | 
			
		||||
  host_ulong	s_size;		/* section size			*/
 | 
			
		||||
  host_ulong	s_scnptr;	/* file ptr to raw data for section */
 | 
			
		||||
  host_ulong	s_relptr;	/* file ptr to relocation	*/
 | 
			
		||||
  host_ulong	s_lnnoptr;	/* file ptr to line numbers	*/
 | 
			
		||||
  unsigned short s_nreloc;	/* number of relocation entries	*/
 | 
			
		||||
  unsigned short s_nlnno;	/* number of line number entries*/
 | 
			
		||||
  host_ulong	s_flags;	/* flags			*/
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#define	SCNHDR	struct external_scnhdr
 | 
			
		||||
#define	SCNHSZ	40
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * names of "special" sections
 | 
			
		||||
 */
 | 
			
		||||
#define _TEXT	".text"
 | 
			
		||||
#define _DATA	".data"
 | 
			
		||||
#define _BSS	".bss"
 | 
			
		||||
#define _COMMENT ".comment"
 | 
			
		||||
#define _LIB ".lib"
 | 
			
		||||
 | 
			
		||||
/********************** LINE NUMBERS **********************/
 | 
			
		||||
 | 
			
		||||
/* 1 line number entry for every "breakpointable" source line in a section.
 | 
			
		||||
 * Line numbers are grouped on a per function basis; first entry in a function
 | 
			
		||||
 * grouping will have l_lnno = 0 and in place of physical address will be the
 | 
			
		||||
 * symbol table index of the function name.
 | 
			
		||||
 */
 | 
			
		||||
struct external_lineno {
 | 
			
		||||
  union {
 | 
			
		||||
    host_ulong l_symndx; /* function name symbol index, iff l_lnno 0 */
 | 
			
		||||
    host_ulong l_paddr;	/* (physical) address of line number	*/
 | 
			
		||||
  } l_addr;
 | 
			
		||||
  unsigned short l_lnno;	/* line number		*/
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#define	LINENO	struct external_lineno
 | 
			
		||||
#define	LINESZ	6
 | 
			
		||||
 | 
			
		||||
/********************** SYMBOLS **********************/
 | 
			
		||||
 | 
			
		||||
#define E_SYMNMLEN	8	/* # characters in a symbol name	*/
 | 
			
		||||
#define E_FILNMLEN	14	/* # characters in a file name		*/
 | 
			
		||||
#define E_DIMNUM	4	/* # array dimensions in auxiliary entry */
 | 
			
		||||
 | 
			
		||||
struct __attribute__((packed)) external_syment
 | 
			
		||||
{
 | 
			
		||||
  union {
 | 
			
		||||
    char e_name[E_SYMNMLEN];
 | 
			
		||||
    struct {
 | 
			
		||||
      host_ulong e_zeroes;
 | 
			
		||||
      host_ulong e_offset;
 | 
			
		||||
    } e;
 | 
			
		||||
  } e;
 | 
			
		||||
  host_ulong e_value;
 | 
			
		||||
  unsigned short e_scnum;
 | 
			
		||||
  unsigned short e_type;
 | 
			
		||||
  char e_sclass[1];
 | 
			
		||||
  char e_numaux[1];
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#define N_BTMASK	(0xf)
 | 
			
		||||
#define N_TMASK		(0x30)
 | 
			
		||||
#define N_BTSHFT	(4)
 | 
			
		||||
#define N_TSHIFT	(2)
 | 
			
		||||
 | 
			
		||||
union external_auxent {
 | 
			
		||||
  struct {
 | 
			
		||||
    host_ulong x_tagndx;	/* str, un, or enum tag indx */
 | 
			
		||||
    union {
 | 
			
		||||
      struct {
 | 
			
		||||
	unsigned short  x_lnno; /* declaration line number */
 | 
			
		||||
	unsigned short  x_size; /* str/union/array size */
 | 
			
		||||
      } x_lnsz;
 | 
			
		||||
      host_ulong x_fsize;	/* size of function */
 | 
			
		||||
    } x_misc;
 | 
			
		||||
    union {
 | 
			
		||||
      struct {			/* if ISFCN, tag, or .bb */
 | 
			
		||||
	host_ulong x_lnnoptr;/* ptr to fcn line # */
 | 
			
		||||
	host_ulong x_endndx;	/* entry ndx past block end */
 | 
			
		||||
      } x_fcn;
 | 
			
		||||
      struct {			/* if ISARY, up to 4 dimen. */
 | 
			
		||||
	char x_dimen[E_DIMNUM][2];
 | 
			
		||||
      } x_ary;
 | 
			
		||||
    } x_fcnary;
 | 
			
		||||
    unsigned short x_tvndx;	/* tv index */
 | 
			
		||||
  } x_sym;
 | 
			
		||||
 | 
			
		||||
  union {
 | 
			
		||||
    char x_fname[E_FILNMLEN];
 | 
			
		||||
    struct {
 | 
			
		||||
      host_ulong x_zeroes;
 | 
			
		||||
      host_ulong x_offset;
 | 
			
		||||
    } x_n;
 | 
			
		||||
  } x_file;
 | 
			
		||||
 | 
			
		||||
  struct {
 | 
			
		||||
    host_ulong x_scnlen;	/* section length */
 | 
			
		||||
    unsigned short x_nreloc;	/* # relocation entries */
 | 
			
		||||
    unsigned short x_nlinno;	/* # line numbers */
 | 
			
		||||
    host_ulong x_checksum;	/* section COMDAT checksum */
 | 
			
		||||
    unsigned short x_associated;/* COMDAT associated section index */
 | 
			
		||||
    char x_comdat[1];		/* COMDAT selection number */
 | 
			
		||||
  } x_scn;
 | 
			
		||||
 | 
			
		||||
  struct {
 | 
			
		||||
    host_ulong x_tvfill;	/* tv fill value */
 | 
			
		||||
    unsigned short x_tvlen;	/* length of .tv */
 | 
			
		||||
    char x_tvran[2][2];		/* tv range */
 | 
			
		||||
  } x_tv;	/* info about .tv section (in auxent of symbol .tv)) */
 | 
			
		||||
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#define	SYMENT	struct external_syment
 | 
			
		||||
#define	SYMESZ	18
 | 
			
		||||
#define	AUXENT	union external_auxent
 | 
			
		||||
#define	AUXESZ	18
 | 
			
		||||
 | 
			
		||||
#define _ETEXT	"etext"
 | 
			
		||||
 | 
			
		||||
/********************** RELOCATION DIRECTIVES **********************/
 | 
			
		||||
 | 
			
		||||
struct external_reloc {
 | 
			
		||||
  char r_vaddr[4];
 | 
			
		||||
  char r_symndx[4];
 | 
			
		||||
  char r_type[2];
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#define RELOC struct external_reloc
 | 
			
		||||
#define RELSZ 10
 | 
			
		||||
 | 
			
		||||
/* end of coff/i386.h */
 | 
			
		||||
 | 
			
		||||
/* PE COFF header information */
 | 
			
		||||
 | 
			
		||||
#ifndef _PE_H
 | 
			
		||||
#define _PE_H
 | 
			
		||||
 | 
			
		||||
/* NT specific file attributes */
 | 
			
		||||
#define IMAGE_FILE_RELOCS_STRIPPED           0x0001
 | 
			
		||||
#define IMAGE_FILE_EXECUTABLE_IMAGE          0x0002
 | 
			
		||||
#define IMAGE_FILE_LINE_NUMS_STRIPPED        0x0004
 | 
			
		||||
#define IMAGE_FILE_LOCAL_SYMS_STRIPPED       0x0008
 | 
			
		||||
#define IMAGE_FILE_BYTES_REVERSED_LO         0x0080
 | 
			
		||||
#define IMAGE_FILE_32BIT_MACHINE             0x0100
 | 
			
		||||
#define IMAGE_FILE_DEBUG_STRIPPED            0x0200
 | 
			
		||||
#define IMAGE_FILE_SYSTEM                    0x1000
 | 
			
		||||
#define IMAGE_FILE_DLL                       0x2000
 | 
			
		||||
#define IMAGE_FILE_BYTES_REVERSED_HI         0x8000
 | 
			
		||||
 | 
			
		||||
/* additional flags to be set for section headers to allow the NT loader to
 | 
			
		||||
   read and write to the section data (to replace the addresses of data in
 | 
			
		||||
   dlls for one thing); also to execute the section in .text's case=
 | 
			
		||||
 */
 | 
			
		||||
#define IMAGE_SCN_MEM_DISCARDABLE 0x02000000
 | 
			
		||||
#define IMAGE_SCN_MEM_EXECUTE     0x20000000
 | 
			
		||||
#define IMAGE_SCN_MEM_READ        0x40000000
 | 
			
		||||
#define IMAGE_SCN_MEM_WRITE       0x80000000
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Section characteristics added for ppc-nt
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_TYPE_NO_PAD                0x00000008  /* Reserved.  */
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_CNT_CODE                   0x00000020  /* Section contains code. */
 | 
			
		||||
#define IMAGE_SCN_CNT_INITIALIZED_DATA       0x00000040  /* Section contains initialized data. */
 | 
			
		||||
#define IMAGE_SCN_CNT_UNINITIALIZED_DATA     0x00000080  /* Section contains uninitialized data. */
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_LNK_OTHER                  0x00000100  /* Reserved.  */
 | 
			
		||||
#define IMAGE_SCN_LNK_INFO                   0x00000200  /* Section contains comments or some other type of information. */
 | 
			
		||||
#define IMAGE_SCN_LNK_REMOVE                 0x00000800  /* Section contents will not become part of image. */
 | 
			
		||||
#define IMAGE_SCN_LNK_COMDAT                 0x00001000  /* Section contents comdat. */
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_MEM_FARDATA                0x00008000
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_MEM_PURGEABLE              0x00020000
 | 
			
		||||
#define IMAGE_SCN_MEM_16BIT                  0x00020000
 | 
			
		||||
#define IMAGE_SCN_MEM_LOCKED                 0x00040000
 | 
			
		||||
#define IMAGE_SCN_MEM_PRELOAD                0x00080000
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_ALIGN_1BYTES               0x00100000
 | 
			
		||||
#define IMAGE_SCN_ALIGN_2BYTES               0x00200000
 | 
			
		||||
#define IMAGE_SCN_ALIGN_4BYTES               0x00300000
 | 
			
		||||
#define IMAGE_SCN_ALIGN_8BYTES               0x00400000
 | 
			
		||||
#define IMAGE_SCN_ALIGN_16BYTES              0x00500000  /* Default alignment if no others are specified. */
 | 
			
		||||
#define IMAGE_SCN_ALIGN_32BYTES              0x00600000
 | 
			
		||||
#define IMAGE_SCN_ALIGN_64BYTES              0x00700000
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
#define IMAGE_SCN_LNK_NRELOC_OVFL            0x01000000  /* Section contains extended relocations. */
 | 
			
		||||
#define IMAGE_SCN_MEM_NOT_CACHED             0x04000000  /* Section is not cachable.               */
 | 
			
		||||
#define IMAGE_SCN_MEM_NOT_PAGED              0x08000000  /* Section is not pageable.               */
 | 
			
		||||
#define IMAGE_SCN_MEM_SHARED                 0x10000000  /* Section is shareable.                  */
 | 
			
		||||
 | 
			
		||||
/* COMDAT selection codes.  */
 | 
			
		||||
 | 
			
		||||
#define IMAGE_COMDAT_SELECT_NODUPLICATES     (1) /* Warn if duplicates.  */
 | 
			
		||||
#define IMAGE_COMDAT_SELECT_ANY		     (2) /* No warning.  */
 | 
			
		||||
#define IMAGE_COMDAT_SELECT_SAME_SIZE	     (3) /* Warn if different size.  */
 | 
			
		||||
#define IMAGE_COMDAT_SELECT_EXACT_MATCH	     (4) /* Warn if different.  */
 | 
			
		||||
#define IMAGE_COMDAT_SELECT_ASSOCIATIVE	     (5) /* Base on other section.  */
 | 
			
		||||
 | 
			
		||||
/* Magic values that are true for all dos/nt implementations */
 | 
			
		||||
#define DOSMAGIC       0x5a4d
 | 
			
		||||
#define NT_SIGNATURE   0x00004550
 | 
			
		||||
 | 
			
		||||
/* NT allows long filenames, we want to accommodate this.  This may break
 | 
			
		||||
     some of the bfd functions */
 | 
			
		||||
#undef  FILNMLEN
 | 
			
		||||
#define FILNMLEN	18	/* # characters in a file name		*/
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
#ifdef COFF_IMAGE_WITH_PE
 | 
			
		||||
/* The filehdr is only weired in images */
 | 
			
		||||
 | 
			
		||||
#undef FILHDR
 | 
			
		||||
struct external_PE_filehdr
 | 
			
		||||
{
 | 
			
		||||
  /* DOS header fields */
 | 
			
		||||
  unsigned short e_magic;	/* Magic number, 0x5a4d */
 | 
			
		||||
  unsigned short e_cblp;	/* Bytes on last page of file, 0x90 */
 | 
			
		||||
  unsigned short e_cp;		/* Pages in file, 0x3 */
 | 
			
		||||
  unsigned short e_crlc;	/* Relocations, 0x0 */
 | 
			
		||||
  unsigned short e_cparhdr;	/* Size of header in paragraphs, 0x4 */
 | 
			
		||||
  unsigned short e_minalloc;	/* Minimum extra paragraphs needed, 0x0 */
 | 
			
		||||
  unsigned short e_maxalloc;	/* Maximum extra paragraphs needed, 0xFFFF */
 | 
			
		||||
  unsigned short e_ss;		/* Initial (relative) SS value, 0x0 */
 | 
			
		||||
  unsigned short e_sp;		/* Initial SP value, 0xb8 */
 | 
			
		||||
  unsigned short e_csum;	/* Checksum, 0x0 */
 | 
			
		||||
  unsigned short e_ip;		/* Initial IP value, 0x0 */
 | 
			
		||||
  unsigned short e_cs;		/* Initial (relative) CS value, 0x0 */
 | 
			
		||||
  unsigned short e_lfarlc;	/* File address of relocation table, 0x40 */
 | 
			
		||||
  unsigned short e_ovno;	/* Overlay number, 0x0 */
 | 
			
		||||
  char e_res[4][2];		/* Reserved words, all 0x0 */
 | 
			
		||||
  unsigned short e_oemid;	/* OEM identifier (for e_oeminfo), 0x0 */
 | 
			
		||||
  unsigned short e_oeminfo;	/* OEM information; e_oemid specific, 0x0 */
 | 
			
		||||
  char e_res2[10][2];		/* Reserved words, all 0x0 */
 | 
			
		||||
  host_ulong e_lfanew;	/* File address of new exe header, 0x80 */
 | 
			
		||||
  char dos_message[16][4];	/* other stuff, always follow DOS header */
 | 
			
		||||
  unsigned int nt_signature;	/* required NT signature, 0x4550 */
 | 
			
		||||
 | 
			
		||||
  /* From standard header */
 | 
			
		||||
 | 
			
		||||
  unsigned short f_magic;	/* magic number			*/
 | 
			
		||||
  unsigned short f_nscns;	/* number of sections		*/
 | 
			
		||||
  host_ulong f_timdat;	/* time & date stamp		*/
 | 
			
		||||
  host_ulong f_symptr;	/* file pointer to symtab	*/
 | 
			
		||||
  host_ulong f_nsyms;	/* number of symtab entries	*/
 | 
			
		||||
  unsigned short f_opthdr;	/* sizeof(optional hdr)		*/
 | 
			
		||||
  unsigned short f_flags;	/* flags			*/
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
#define FILHDR struct external_PE_filehdr
 | 
			
		||||
#undef FILHSZ
 | 
			
		||||
#define FILHSZ 152
 | 
			
		||||
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
typedef struct
 | 
			
		||||
{
 | 
			
		||||
  unsigned short magic;		/* type of file				*/
 | 
			
		||||
  unsigned short vstamp;	/* version stamp			*/
 | 
			
		||||
  host_ulong	tsize;		/* text size in bytes, padded to FW bdry*/
 | 
			
		||||
  host_ulong	dsize;		/* initialized data "  "		*/
 | 
			
		||||
  host_ulong	bsize;		/* uninitialized data "   "		*/
 | 
			
		||||
  host_ulong	entry;		/* entry pt.				*/
 | 
			
		||||
  host_ulong text_start;	/* base of text used for this file */
 | 
			
		||||
  host_ulong data_start;	/* base of all data used for this file */
 | 
			
		||||
 | 
			
		||||
  /* NT extra fields; see internal.h for descriptions */
 | 
			
		||||
  host_ulong  ImageBase;
 | 
			
		||||
  host_ulong  SectionAlignment;
 | 
			
		||||
  host_ulong  FileAlignment;
 | 
			
		||||
  unsigned short  MajorOperatingSystemVersion;
 | 
			
		||||
  unsigned short  MinorOperatingSystemVersion;
 | 
			
		||||
  unsigned short  MajorImageVersion;
 | 
			
		||||
  unsigned short  MinorImageVersion;
 | 
			
		||||
  unsigned short  MajorSubsystemVersion;
 | 
			
		||||
  unsigned short  MinorSubsystemVersion;
 | 
			
		||||
  char  Reserved1[4];
 | 
			
		||||
  host_ulong  SizeOfImage;
 | 
			
		||||
  host_ulong  SizeOfHeaders;
 | 
			
		||||
  host_ulong  CheckSum;
 | 
			
		||||
  unsigned short Subsystem;
 | 
			
		||||
  unsigned short DllCharacteristics;
 | 
			
		||||
  host_ulong  SizeOfStackReserve;
 | 
			
		||||
  host_ulong  SizeOfStackCommit;
 | 
			
		||||
  host_ulong  SizeOfHeapReserve;
 | 
			
		||||
  host_ulong  SizeOfHeapCommit;
 | 
			
		||||
  host_ulong  LoaderFlags;
 | 
			
		||||
  host_ulong  NumberOfRvaAndSizes;
 | 
			
		||||
  /* IMAGE_DATA_DIRECTORY DataDirectory[IMAGE_NUMBEROF_DIRECTORY_ENTRIES]; */
 | 
			
		||||
  char  DataDirectory[16][2][4]; /* 16 entries, 2 elements/entry, 4 chars */
 | 
			
		||||
 | 
			
		||||
} PEAOUTHDR;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
#undef AOUTSZ
 | 
			
		||||
#define AOUTSZ (AOUTHDRSZ + 196)
 | 
			
		||||
 | 
			
		||||
#undef  E_FILNMLEN
 | 
			
		||||
#define E_FILNMLEN	18	/* # characters in a file name		*/
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
/* end of coff/pe.h */
 | 
			
		||||
 | 
			
		||||
#define DT_NON		(0)	/* no derived type */
 | 
			
		||||
#define DT_PTR		(1)	/* pointer */
 | 
			
		||||
#define DT_FCN		(2)	/* function */
 | 
			
		||||
#define DT_ARY		(3)	/* array */
 | 
			
		||||
 | 
			
		||||
#define ISPTR(x)	(((x) & N_TMASK) == (DT_PTR << N_BTSHFT))
 | 
			
		||||
#define ISFCN(x)	(((x) & N_TMASK) == (DT_FCN << N_BTSHFT))
 | 
			
		||||
#define ISARY(x)	(((x) & N_TMASK) == (DT_ARY << N_BTSHFT))
 | 
			
		||||
 | 
			
		||||
#ifdef __cplusplus
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#endif /* _A_OUT_H_ */
 | 
			
		||||
							
								
								
									
										26
									
								
								aes.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										26
									
								
								aes.h
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,26 @@
 | 
			
		||||
#ifndef QEMU_AES_H
 | 
			
		||||
#define QEMU_AES_H
 | 
			
		||||
 | 
			
		||||
#define AES_MAXNR 14
 | 
			
		||||
#define AES_BLOCK_SIZE 16
 | 
			
		||||
 | 
			
		||||
struct aes_key_st {
 | 
			
		||||
    uint32_t rd_key[4 *(AES_MAXNR + 1)];
 | 
			
		||||
    int rounds;
 | 
			
		||||
};
 | 
			
		||||
typedef struct aes_key_st AES_KEY;
 | 
			
		||||
 | 
			
		||||
int AES_set_encrypt_key(const unsigned char *userKey, const int bits,
 | 
			
		||||
	AES_KEY *key);
 | 
			
		||||
int AES_set_decrypt_key(const unsigned char *userKey, const int bits,
 | 
			
		||||
	AES_KEY *key);
 | 
			
		||||
 | 
			
		||||
void AES_encrypt(const unsigned char *in, unsigned char *out,
 | 
			
		||||
	const AES_KEY *key);
 | 
			
		||||
void AES_decrypt(const unsigned char *in, unsigned char *out,
 | 
			
		||||
	const AES_KEY *key);
 | 
			
		||||
void AES_cbc_encrypt(const unsigned char *in, unsigned char *out,
 | 
			
		||||
		     const unsigned long length, const AES_KEY *key,
 | 
			
		||||
		     unsigned char *ivec, const int enc);
 | 
			
		||||
 | 
			
		||||
#endif
 | 
			
		||||
							
								
								
									
										274
									
								
								aio-posix.c
									
									
									
									
									
								
							
							
						
						
									
										274
									
								
								aio-posix.c
									
									
									
									
									
								
							@@ -1,274 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU aio implementation
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2008
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 | 
			
		||||
 * the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 * Contributions after 2012-01-13 are licensed under the terms of the
 | 
			
		||||
 * GNU GPL, version 2 or (at your option) any later version.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block.h"
 | 
			
		||||
#include "qemu/queue.h"
 | 
			
		||||
#include "qemu/sockets.h"
 | 
			
		||||
 | 
			
		||||
struct AioHandler
 | 
			
		||||
{
 | 
			
		||||
    GPollFD pfd;
 | 
			
		||||
    IOHandler *io_read;
 | 
			
		||||
    IOHandler *io_write;
 | 
			
		||||
    int deleted;
 | 
			
		||||
    int pollfds_idx;
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    QLIST_ENTRY(AioHandler) node;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static AioHandler *find_aio_handler(AioContext *ctx, int fd)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
        if (node->pfd.fd == fd)
 | 
			
		||||
            if (!node->deleted)
 | 
			
		||||
                return node;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_set_fd_handler(AioContext *ctx,
 | 
			
		||||
                        int fd,
 | 
			
		||||
                        IOHandler *io_read,
 | 
			
		||||
                        IOHandler *io_write,
 | 
			
		||||
                        void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    node = find_aio_handler(ctx, fd);
 | 
			
		||||
 | 
			
		||||
    /* Are we deleting the fd handler? */
 | 
			
		||||
    if (!io_read && !io_write) {
 | 
			
		||||
        if (node) {
 | 
			
		||||
            g_source_remove_poll(&ctx->source, &node->pfd);
 | 
			
		||||
 | 
			
		||||
            /* If the lock is held, just mark the node as deleted */
 | 
			
		||||
            if (ctx->walking_handlers) {
 | 
			
		||||
                node->deleted = 1;
 | 
			
		||||
                node->pfd.revents = 0;
 | 
			
		||||
            } else {
 | 
			
		||||
                /* Otherwise, delete it for real.  We can't just mark it as
 | 
			
		||||
                 * deleted because deleted nodes are only cleaned up after
 | 
			
		||||
                 * releasing the walking_handlers lock.
 | 
			
		||||
                 */
 | 
			
		||||
                QLIST_REMOVE(node, node);
 | 
			
		||||
                g_free(node);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        if (node == NULL) {
 | 
			
		||||
            /* Alloc and insert if it's not already there */
 | 
			
		||||
            node = g_malloc0(sizeof(AioHandler));
 | 
			
		||||
            node->pfd.fd = fd;
 | 
			
		||||
            QLIST_INSERT_HEAD(&ctx->aio_handlers, node, node);
 | 
			
		||||
 | 
			
		||||
            g_source_add_poll(&ctx->source, &node->pfd);
 | 
			
		||||
        }
 | 
			
		||||
        /* Update handler with latest information */
 | 
			
		||||
        node->io_read = io_read;
 | 
			
		||||
        node->io_write = io_write;
 | 
			
		||||
        node->opaque = opaque;
 | 
			
		||||
        node->pollfds_idx = -1;
 | 
			
		||||
 | 
			
		||||
        node->pfd.events = (io_read ? G_IO_IN | G_IO_HUP | G_IO_ERR : 0);
 | 
			
		||||
        node->pfd.events |= (io_write ? G_IO_OUT | G_IO_ERR : 0);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    aio_notify(ctx);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_set_event_notifier(AioContext *ctx,
 | 
			
		||||
                            EventNotifier *notifier,
 | 
			
		||||
                            EventNotifierHandler *io_read)
 | 
			
		||||
{
 | 
			
		||||
    aio_set_fd_handler(ctx, event_notifier_get_fd(notifier),
 | 
			
		||||
                       (IOHandler *)io_read, NULL, notifier);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool aio_pending(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
        int revents;
 | 
			
		||||
 | 
			
		||||
        revents = node->pfd.revents & node->pfd.events;
 | 
			
		||||
        if (revents & (G_IO_IN | G_IO_HUP | G_IO_ERR) && node->io_read) {
 | 
			
		||||
            return true;
 | 
			
		||||
        }
 | 
			
		||||
        if (revents & (G_IO_OUT | G_IO_ERR) && node->io_write) {
 | 
			
		||||
            return true;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return false;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool aio_dispatch(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
    bool progress = false;
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * We have to walk very carefully in case aio_set_fd_handler is
 | 
			
		||||
     * called while we're walking.
 | 
			
		||||
     */
 | 
			
		||||
    node = QLIST_FIRST(&ctx->aio_handlers);
 | 
			
		||||
    while (node) {
 | 
			
		||||
        AioHandler *tmp;
 | 
			
		||||
        int revents;
 | 
			
		||||
 | 
			
		||||
        ctx->walking_handlers++;
 | 
			
		||||
 | 
			
		||||
        revents = node->pfd.revents & node->pfd.events;
 | 
			
		||||
        node->pfd.revents = 0;
 | 
			
		||||
 | 
			
		||||
        if (!node->deleted &&
 | 
			
		||||
            (revents & (G_IO_IN | G_IO_HUP | G_IO_ERR)) &&
 | 
			
		||||
            node->io_read) {
 | 
			
		||||
            node->io_read(node->opaque);
 | 
			
		||||
 | 
			
		||||
            /* aio_notify() does not count as progress */
 | 
			
		||||
            if (node->opaque != &ctx->notifier) {
 | 
			
		||||
                progress = true;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        if (!node->deleted &&
 | 
			
		||||
            (revents & (G_IO_OUT | G_IO_ERR)) &&
 | 
			
		||||
            node->io_write) {
 | 
			
		||||
            node->io_write(node->opaque);
 | 
			
		||||
            progress = true;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        tmp = node;
 | 
			
		||||
        node = QLIST_NEXT(node, node);
 | 
			
		||||
 | 
			
		||||
        ctx->walking_handlers--;
 | 
			
		||||
 | 
			
		||||
        if (!ctx->walking_handlers && tmp->deleted) {
 | 
			
		||||
            QLIST_REMOVE(tmp, node);
 | 
			
		||||
            g_free(tmp);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Run our timers */
 | 
			
		||||
    progress |= timerlistgroup_run_timers(&ctx->tlg);
 | 
			
		||||
 | 
			
		||||
    return progress;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool aio_poll(AioContext *ctx, bool blocking)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
    bool was_dispatching;
 | 
			
		||||
    int ret;
 | 
			
		||||
    bool progress;
 | 
			
		||||
 | 
			
		||||
    was_dispatching = ctx->dispatching;
 | 
			
		||||
    progress = false;
 | 
			
		||||
 | 
			
		||||
    /* aio_notify can avoid the expensive event_notifier_set if
 | 
			
		||||
     * everything (file descriptors, bottom halves, timers) will
 | 
			
		||||
     * be re-evaluated before the next blocking poll().  This happens
 | 
			
		||||
     * in two cases:
 | 
			
		||||
     *
 | 
			
		||||
     * 1) when aio_poll is called with blocking == false
 | 
			
		||||
     *
 | 
			
		||||
     * 2) when we are called after poll().  If we are called before
 | 
			
		||||
     *    poll(), bottom halves will not be re-evaluated and we need
 | 
			
		||||
     *    aio_notify() if blocking == true.
 | 
			
		||||
     *
 | 
			
		||||
     * The first aio_dispatch() only does something when AioContext is
 | 
			
		||||
     * running as a GSource, and in that case aio_poll is used only
 | 
			
		||||
     * with blocking == false, so this optimization is already quite
 | 
			
		||||
     * effective.  However, the code is ugly and should be restructured
 | 
			
		||||
     * to have a single aio_dispatch() call.  To do this, we need to
 | 
			
		||||
     * reorganize aio_poll into a prepare/poll/dispatch model like
 | 
			
		||||
     * glib's.
 | 
			
		||||
     *
 | 
			
		||||
     * If we're in a nested event loop, ctx->dispatching might be true.
 | 
			
		||||
     * In that case we can restore it just before returning, but we
 | 
			
		||||
     * have to clear it now.
 | 
			
		||||
     */
 | 
			
		||||
    aio_set_dispatching(ctx, !blocking);
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * If there are callbacks left that have been queued, we need to call them.
 | 
			
		||||
     * Do not call select in this case, because it is possible that the caller
 | 
			
		||||
     * does not need a complete flush (as is the case for aio_poll loops).
 | 
			
		||||
     */
 | 
			
		||||
    if (aio_bh_poll(ctx)) {
 | 
			
		||||
        blocking = false;
 | 
			
		||||
        progress = true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Re-evaluate condition (1) above.  */
 | 
			
		||||
    aio_set_dispatching(ctx, !blocking);
 | 
			
		||||
    if (aio_dispatch(ctx)) {
 | 
			
		||||
        progress = true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (progress && !blocking) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ctx->walking_handlers++;
 | 
			
		||||
 | 
			
		||||
    g_array_set_size(ctx->pollfds, 0);
 | 
			
		||||
 | 
			
		||||
    /* fill pollfds */
 | 
			
		||||
    QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
        node->pollfds_idx = -1;
 | 
			
		||||
        if (!node->deleted && node->pfd.events) {
 | 
			
		||||
            GPollFD pfd = {
 | 
			
		||||
                .fd = node->pfd.fd,
 | 
			
		||||
                .events = node->pfd.events,
 | 
			
		||||
            };
 | 
			
		||||
            node->pollfds_idx = ctx->pollfds->len;
 | 
			
		||||
            g_array_append_val(ctx->pollfds, pfd);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ctx->walking_handlers--;
 | 
			
		||||
 | 
			
		||||
    /* wait until next event */
 | 
			
		||||
    ret = qemu_poll_ns((GPollFD *)ctx->pollfds->data,
 | 
			
		||||
                         ctx->pollfds->len,
 | 
			
		||||
                         blocking ? timerlistgroup_deadline_ns(&ctx->tlg) : 0);
 | 
			
		||||
 | 
			
		||||
    /* if we have any readable fds, dispatch event */
 | 
			
		||||
    if (ret > 0) {
 | 
			
		||||
        QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
            if (node->pollfds_idx != -1) {
 | 
			
		||||
                GPollFD *pfd = &g_array_index(ctx->pollfds, GPollFD,
 | 
			
		||||
                                              node->pollfds_idx);
 | 
			
		||||
                node->pfd.revents = pfd->revents;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Run dispatch even if there were no readable fds to run timers */
 | 
			
		||||
    aio_set_dispatching(ctx, true);
 | 
			
		||||
    if (aio_dispatch(ctx)) {
 | 
			
		||||
        progress = true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    aio_set_dispatching(ctx, was_dispatching);
 | 
			
		||||
    return progress;
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										223
									
								
								aio-win32.c
									
									
									
									
									
								
							
							
						
						
									
										223
									
								
								aio-win32.c
									
									
									
									
									
								
							@@ -1,223 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU aio implementation
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM Corp., 2008
 | 
			
		||||
 * Copyright Red Hat Inc., 2012
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *  Paolo Bonzini     <pbonzini@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 | 
			
		||||
 * the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 * Contributions after 2012-01-13 are licensed under the terms of the
 | 
			
		||||
 * GNU GPL, version 2 or (at your option) any later version.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block.h"
 | 
			
		||||
#include "qemu/queue.h"
 | 
			
		||||
#include "qemu/sockets.h"
 | 
			
		||||
 | 
			
		||||
struct AioHandler {
 | 
			
		||||
    EventNotifier *e;
 | 
			
		||||
    EventNotifierHandler *io_notify;
 | 
			
		||||
    GPollFD pfd;
 | 
			
		||||
    int deleted;
 | 
			
		||||
    QLIST_ENTRY(AioHandler) node;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
void aio_set_event_notifier(AioContext *ctx,
 | 
			
		||||
                            EventNotifier *e,
 | 
			
		||||
                            EventNotifierHandler *io_notify)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
        if (node->e == e && !node->deleted) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Are we deleting the fd handler? */
 | 
			
		||||
    if (!io_notify) {
 | 
			
		||||
        if (node) {
 | 
			
		||||
            g_source_remove_poll(&ctx->source, &node->pfd);
 | 
			
		||||
 | 
			
		||||
            /* If the lock is held, just mark the node as deleted */
 | 
			
		||||
            if (ctx->walking_handlers) {
 | 
			
		||||
                node->deleted = 1;
 | 
			
		||||
                node->pfd.revents = 0;
 | 
			
		||||
            } else {
 | 
			
		||||
                /* Otherwise, delete it for real.  We can't just mark it as
 | 
			
		||||
                 * deleted because deleted nodes are only cleaned up after
 | 
			
		||||
                 * releasing the walking_handlers lock.
 | 
			
		||||
                 */
 | 
			
		||||
                QLIST_REMOVE(node, node);
 | 
			
		||||
                g_free(node);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        if (node == NULL) {
 | 
			
		||||
            /* Alloc and insert if it's not already there */
 | 
			
		||||
            node = g_malloc0(sizeof(AioHandler));
 | 
			
		||||
            node->e = e;
 | 
			
		||||
            node->pfd.fd = (uintptr_t)event_notifier_get_handle(e);
 | 
			
		||||
            node->pfd.events = G_IO_IN;
 | 
			
		||||
            QLIST_INSERT_HEAD(&ctx->aio_handlers, node, node);
 | 
			
		||||
 | 
			
		||||
            g_source_add_poll(&ctx->source, &node->pfd);
 | 
			
		||||
        }
 | 
			
		||||
        /* Update handler with latest information */
 | 
			
		||||
        node->io_notify = io_notify;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    aio_notify(ctx);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool aio_pending(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
        if (node->pfd.revents && node->io_notify) {
 | 
			
		||||
            return true;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return false;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool aio_poll(AioContext *ctx, bool blocking)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
    HANDLE events[MAXIMUM_WAIT_OBJECTS + 1];
 | 
			
		||||
    bool progress;
 | 
			
		||||
    int count;
 | 
			
		||||
    int timeout;
 | 
			
		||||
 | 
			
		||||
    progress = false;
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * If there are callbacks left that have been queued, we need to call then.
 | 
			
		||||
     * Do not call select in this case, because it is possible that the caller
 | 
			
		||||
     * does not need a complete flush (as is the case for aio_poll loops).
 | 
			
		||||
     */
 | 
			
		||||
    if (aio_bh_poll(ctx)) {
 | 
			
		||||
        blocking = false;
 | 
			
		||||
        progress = true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Run timers */
 | 
			
		||||
    progress |= timerlistgroup_run_timers(&ctx->tlg);
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * Then dispatch any pending callbacks from the GSource.
 | 
			
		||||
     *
 | 
			
		||||
     * We have to walk very carefully in case aio_set_fd_handler is
 | 
			
		||||
     * called while we're walking.
 | 
			
		||||
     */
 | 
			
		||||
    node = QLIST_FIRST(&ctx->aio_handlers);
 | 
			
		||||
    while (node) {
 | 
			
		||||
        AioHandler *tmp;
 | 
			
		||||
 | 
			
		||||
        ctx->walking_handlers++;
 | 
			
		||||
 | 
			
		||||
        if (node->pfd.revents && node->io_notify) {
 | 
			
		||||
            node->pfd.revents = 0;
 | 
			
		||||
            node->io_notify(node->e);
 | 
			
		||||
 | 
			
		||||
            /* aio_notify() does not count as progress */
 | 
			
		||||
            if (node->e != &ctx->notifier) {
 | 
			
		||||
                progress = true;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        tmp = node;
 | 
			
		||||
        node = QLIST_NEXT(node, node);
 | 
			
		||||
 | 
			
		||||
        ctx->walking_handlers--;
 | 
			
		||||
 | 
			
		||||
        if (!ctx->walking_handlers && tmp->deleted) {
 | 
			
		||||
            QLIST_REMOVE(tmp, node);
 | 
			
		||||
            g_free(tmp);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (progress && !blocking) {
 | 
			
		||||
        return true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ctx->walking_handlers++;
 | 
			
		||||
 | 
			
		||||
    /* fill fd sets */
 | 
			
		||||
    count = 0;
 | 
			
		||||
    QLIST_FOREACH(node, &ctx->aio_handlers, node) {
 | 
			
		||||
        if (!node->deleted && node->io_notify) {
 | 
			
		||||
            events[count++] = event_notifier_get_handle(node->e);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ctx->walking_handlers--;
 | 
			
		||||
 | 
			
		||||
    /* wait until next event */
 | 
			
		||||
    while (count > 0) {
 | 
			
		||||
        int ret;
 | 
			
		||||
 | 
			
		||||
        timeout = blocking ?
 | 
			
		||||
            qemu_timeout_ns_to_ms(timerlistgroup_deadline_ns(&ctx->tlg)) : 0;
 | 
			
		||||
        ret = WaitForMultipleObjects(count, events, FALSE, timeout);
 | 
			
		||||
 | 
			
		||||
        /* if we have any signaled events, dispatch event */
 | 
			
		||||
        if ((DWORD) (ret - WAIT_OBJECT_0) >= count) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        blocking = false;
 | 
			
		||||
 | 
			
		||||
        /* we have to walk very carefully in case
 | 
			
		||||
         * aio_set_fd_handler is called while we're walking */
 | 
			
		||||
        node = QLIST_FIRST(&ctx->aio_handlers);
 | 
			
		||||
        while (node) {
 | 
			
		||||
            AioHandler *tmp;
 | 
			
		||||
 | 
			
		||||
            ctx->walking_handlers++;
 | 
			
		||||
 | 
			
		||||
            if (!node->deleted &&
 | 
			
		||||
                event_notifier_get_handle(node->e) == events[ret - WAIT_OBJECT_0] &&
 | 
			
		||||
                node->io_notify) {
 | 
			
		||||
                node->io_notify(node->e);
 | 
			
		||||
 | 
			
		||||
                /* aio_notify() does not count as progress */
 | 
			
		||||
                if (node->e != &ctx->notifier) {
 | 
			
		||||
                    progress = true;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            tmp = node;
 | 
			
		||||
            node = QLIST_NEXT(node, node);
 | 
			
		||||
 | 
			
		||||
            ctx->walking_handlers--;
 | 
			
		||||
 | 
			
		||||
            if (!ctx->walking_handlers && tmp->deleted) {
 | 
			
		||||
                QLIST_REMOVE(tmp, node);
 | 
			
		||||
                g_free(tmp);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* Try again, but only call each handler once.  */
 | 
			
		||||
        events[ret - WAIT_OBJECT_0] = events[--count];
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (blocking) {
 | 
			
		||||
        /* Run the timers a second time. We do this because otherwise aio_wait
 | 
			
		||||
         * will not note progress - and will stop a drain early - if we have
 | 
			
		||||
         * a timer that was not ready to run entering g_poll but is ready
 | 
			
		||||
         * after g_poll. This will only do anything if a timer has expired.
 | 
			
		||||
         */
 | 
			
		||||
        progress |= timerlistgroup_run_timers(&ctx->tlg);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return progress;
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										193
									
								
								aio.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										193
									
								
								aio.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,193 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU aio implementation
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2008
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 | 
			
		||||
 * the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block.h"
 | 
			
		||||
#include "sys-queue.h"
 | 
			
		||||
#include "qemu_socket.h"
 | 
			
		||||
 | 
			
		||||
typedef struct AioHandler AioHandler;
 | 
			
		||||
 | 
			
		||||
/* The list of registered AIO handlers */
 | 
			
		||||
static LIST_HEAD(, AioHandler) aio_handlers;
 | 
			
		||||
 | 
			
		||||
/* This is a simple lock used to protect the aio_handlers list.  Specifically,
 | 
			
		||||
 * it's used to ensure that no callbacks are removed while we're walking and
 | 
			
		||||
 * dispatching callbacks.
 | 
			
		||||
 */
 | 
			
		||||
static int walking_handlers;
 | 
			
		||||
 | 
			
		||||
struct AioHandler
 | 
			
		||||
{
 | 
			
		||||
    int fd;
 | 
			
		||||
    IOHandler *io_read;
 | 
			
		||||
    IOHandler *io_write;
 | 
			
		||||
    AioFlushHandler *io_flush;
 | 
			
		||||
    int deleted;
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    LIST_ENTRY(AioHandler) node;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static AioHandler *find_aio_handler(int fd)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    LIST_FOREACH(node, &aio_handlers, node) {
 | 
			
		||||
        if (node->fd == fd)
 | 
			
		||||
            return node;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int qemu_aio_set_fd_handler(int fd,
 | 
			
		||||
                            IOHandler *io_read,
 | 
			
		||||
                            IOHandler *io_write,
 | 
			
		||||
                            AioFlushHandler *io_flush,
 | 
			
		||||
                            void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
 | 
			
		||||
    node = find_aio_handler(fd);
 | 
			
		||||
 | 
			
		||||
    /* Are we deleting the fd handler? */
 | 
			
		||||
    if (!io_read && !io_write) {
 | 
			
		||||
        if (node) {
 | 
			
		||||
            /* If the lock is held, just mark the node as deleted */
 | 
			
		||||
            if (walking_handlers)
 | 
			
		||||
                node->deleted = 1;
 | 
			
		||||
            else {
 | 
			
		||||
                /* Otherwise, delete it for real.  We can't just mark it as
 | 
			
		||||
                 * deleted because deleted nodes are only cleaned up after
 | 
			
		||||
                 * releasing the walking_handlers lock.
 | 
			
		||||
                 */
 | 
			
		||||
                LIST_REMOVE(node, node);
 | 
			
		||||
                qemu_free(node);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        if (node == NULL) {
 | 
			
		||||
            /* Alloc and insert if it's not already there */
 | 
			
		||||
            node = qemu_mallocz(sizeof(AioHandler));
 | 
			
		||||
            node->fd = fd;
 | 
			
		||||
            LIST_INSERT_HEAD(&aio_handlers, node, node);
 | 
			
		||||
        }
 | 
			
		||||
        /* Update handler with latest information */
 | 
			
		||||
        node->io_read = io_read;
 | 
			
		||||
        node->io_write = io_write;
 | 
			
		||||
        node->io_flush = io_flush;
 | 
			
		||||
        node->opaque = opaque;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_set_fd_handler2(fd, NULL, io_read, io_write, opaque);
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void qemu_aio_flush(void)
 | 
			
		||||
{
 | 
			
		||||
    AioHandler *node;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        ret = 0;
 | 
			
		||||
 | 
			
		||||
        LIST_FOREACH(node, &aio_handlers, node) {
 | 
			
		||||
            ret |= node->io_flush(node->opaque);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        qemu_aio_wait();
 | 
			
		||||
    } while (ret > 0);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void qemu_aio_wait(void)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    if (qemu_bh_poll())
 | 
			
		||||
        return;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        AioHandler *node;
 | 
			
		||||
        fd_set rdfds, wrfds;
 | 
			
		||||
        int max_fd = -1;
 | 
			
		||||
 | 
			
		||||
        walking_handlers = 1;
 | 
			
		||||
 | 
			
		||||
        FD_ZERO(&rdfds);
 | 
			
		||||
        FD_ZERO(&wrfds);
 | 
			
		||||
 | 
			
		||||
        /* fill fd sets */
 | 
			
		||||
        LIST_FOREACH(node, &aio_handlers, node) {
 | 
			
		||||
            /* If there aren't pending AIO operations, don't invoke callbacks.
 | 
			
		||||
             * Otherwise, if there are no AIO requests, qemu_aio_wait() would
 | 
			
		||||
             * wait indefinitely.
 | 
			
		||||
             */
 | 
			
		||||
            if (node->io_flush && node->io_flush(node->opaque) == 0)
 | 
			
		||||
                continue;
 | 
			
		||||
 | 
			
		||||
            if (!node->deleted && node->io_read) {
 | 
			
		||||
                FD_SET(node->fd, &rdfds);
 | 
			
		||||
                max_fd = MAX(max_fd, node->fd + 1);
 | 
			
		||||
            }
 | 
			
		||||
            if (!node->deleted && node->io_write) {
 | 
			
		||||
                FD_SET(node->fd, &wrfds);
 | 
			
		||||
                max_fd = MAX(max_fd, node->fd + 1);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        walking_handlers = 0;
 | 
			
		||||
 | 
			
		||||
        /* No AIO operations?  Get us out of here */
 | 
			
		||||
        if (max_fd == -1)
 | 
			
		||||
            break;
 | 
			
		||||
 | 
			
		||||
        /* wait until next event */
 | 
			
		||||
        ret = select(max_fd, &rdfds, &wrfds, NULL, NULL);
 | 
			
		||||
        if (ret == -1 && errno == EINTR)
 | 
			
		||||
            continue;
 | 
			
		||||
 | 
			
		||||
        /* if we have any readable fds, dispatch event */
 | 
			
		||||
        if (ret > 0) {
 | 
			
		||||
            walking_handlers = 1;
 | 
			
		||||
 | 
			
		||||
            /* we have to walk very carefully in case
 | 
			
		||||
             * qemu_aio_set_fd_handler is called while we're walking */
 | 
			
		||||
            node = LIST_FIRST(&aio_handlers);
 | 
			
		||||
            while (node) {
 | 
			
		||||
                AioHandler *tmp;
 | 
			
		||||
 | 
			
		||||
                if (!node->deleted &&
 | 
			
		||||
                    FD_ISSET(node->fd, &rdfds) &&
 | 
			
		||||
                    node->io_read) {
 | 
			
		||||
                    node->io_read(node->opaque);
 | 
			
		||||
                }
 | 
			
		||||
                if (!node->deleted &&
 | 
			
		||||
                    FD_ISSET(node->fd, &wrfds) &&
 | 
			
		||||
                    node->io_write) {
 | 
			
		||||
                    node->io_write(node->opaque);
 | 
			
		||||
                }
 | 
			
		||||
 | 
			
		||||
                tmp = node;
 | 
			
		||||
                node = LIST_NEXT(node, node);
 | 
			
		||||
 | 
			
		||||
                if (tmp->deleted) {
 | 
			
		||||
                    LIST_REMOVE(tmp, node);
 | 
			
		||||
                    qemu_free(tmp);
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            walking_handlers = 0;
 | 
			
		||||
        }
 | 
			
		||||
    } while (ret == 0);
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										1960
									
								
								alpha-dis.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										1960
									
								
								alpha-dis.c
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										128
									
								
								alpha.ld
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										128
									
								
								alpha.ld
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,128 @@
 | 
			
		||||
OUTPUT_FORMAT("elf64-alpha", "elf64-alpha",
 | 
			
		||||
	      "elf64-alpha")
 | 
			
		||||
OUTPUT_ARCH(alpha)
 | 
			
		||||
ENTRY(__start)
 | 
			
		||||
SEARCH_DIR(/lib); SEARCH_DIR(/usr/lib); SEARCH_DIR(/usr/local/lib); SEARCH_DIR(/usr/alpha-unknown-linux-gnu/lib);
 | 
			
		||||
SECTIONS
 | 
			
		||||
{
 | 
			
		||||
  /* Read-only sections, merged into text segment: */
 | 
			
		||||
  . = 0x60000000 + SIZEOF_HEADERS;
 | 
			
		||||
  .interp     : { *(.interp) 	}
 | 
			
		||||
  .hash          : { *(.hash)		}
 | 
			
		||||
  .dynsym        : { *(.dynsym)		}
 | 
			
		||||
  .dynstr        : { *(.dynstr)		}
 | 
			
		||||
  .gnu.version   : { *(.gnu.version)	}
 | 
			
		||||
  .gnu.version_d   : { *(.gnu.version_d)	}
 | 
			
		||||
  .gnu.version_r   : { *(.gnu.version_r)	}
 | 
			
		||||
  .rel.text      :
 | 
			
		||||
    { *(.rel.text) *(.rel.gnu.linkonce.t*) }
 | 
			
		||||
  .rela.text     :
 | 
			
		||||
    { *(.rela.text) *(.rela.gnu.linkonce.t*) }
 | 
			
		||||
  .rel.data      :
 | 
			
		||||
    { *(.rel.data) *(.rel.gnu.linkonce.d*) }
 | 
			
		||||
  .rela.data     :
 | 
			
		||||
    { *(.rela.data) *(.rela.gnu.linkonce.d*) }
 | 
			
		||||
  .rel.rodata    :
 | 
			
		||||
    { *(.rel.rodata) *(.rel.gnu.linkonce.r*) }
 | 
			
		||||
  .rela.rodata   :
 | 
			
		||||
    { *(.rela.rodata) *(.rela.gnu.linkonce.r*) }
 | 
			
		||||
  .rel.got       : { *(.rel.got)		}
 | 
			
		||||
  .rela.got      : { *(.rela.got)		}
 | 
			
		||||
  .rel.ctors     : { *(.rel.ctors)	}
 | 
			
		||||
  .rela.ctors    : { *(.rela.ctors)	}
 | 
			
		||||
  .rel.dtors     : { *(.rel.dtors)	}
 | 
			
		||||
  .rela.dtors    : { *(.rela.dtors)	}
 | 
			
		||||
  .rel.init      : { *(.rel.init)	}
 | 
			
		||||
  .rela.init     : { *(.rela.init)	}
 | 
			
		||||
  .rel.fini      : { *(.rel.fini)	}
 | 
			
		||||
  .rela.fini     : { *(.rela.fini)	}
 | 
			
		||||
  .rel.bss       : { *(.rel.bss)		}
 | 
			
		||||
  .rela.bss      : { *(.rela.bss)		}
 | 
			
		||||
  .rel.plt       : { *(.rel.plt)		}
 | 
			
		||||
  .rela.plt      : { *(.rela.plt)		}
 | 
			
		||||
  .init          : { *(.init)	} =0x47ff041f
 | 
			
		||||
  .text      :
 | 
			
		||||
  {
 | 
			
		||||
    *(.text)
 | 
			
		||||
    /* .gnu.warning sections are handled specially by elf32.em.  */
 | 
			
		||||
    *(.gnu.warning)
 | 
			
		||||
    *(.gnu.linkonce.t*)
 | 
			
		||||
  } =0x47ff041f
 | 
			
		||||
  _etext = .;
 | 
			
		||||
  PROVIDE (etext = .);
 | 
			
		||||
  .fini      : { *(.fini)    } =0x47ff041f
 | 
			
		||||
  .rodata    : { *(.rodata) *(.gnu.linkonce.r*) }
 | 
			
		||||
  .rodata1   : { *(.rodata1) }
 | 
			
		||||
  .reginfo : { *(.reginfo) }
 | 
			
		||||
  /* Adjust the address for the data segment.  We want to adjust up to
 | 
			
		||||
     the same address within the page on the next page up.  */
 | 
			
		||||
  . = ALIGN(0x100000) + (. & (0x100000 - 1));
 | 
			
		||||
  .data    :
 | 
			
		||||
  {
 | 
			
		||||
    *(.data)
 | 
			
		||||
    *(.gnu.linkonce.d*)
 | 
			
		||||
    CONSTRUCTORS
 | 
			
		||||
  }
 | 
			
		||||
  .data1   : { *(.data1) }
 | 
			
		||||
  .ctors         :
 | 
			
		||||
  {
 | 
			
		||||
    *(.ctors)
 | 
			
		||||
  }
 | 
			
		||||
  .dtors         :
 | 
			
		||||
  {
 | 
			
		||||
    *(.dtors)
 | 
			
		||||
  }
 | 
			
		||||
  .plt      : { *(.plt)	}
 | 
			
		||||
  .got           : { *(.got.plt) *(.got) }
 | 
			
		||||
  .dynamic       : { *(.dynamic) }
 | 
			
		||||
  /* We want the small data sections together, so single-instruction offsets
 | 
			
		||||
     can access them all, and initialized data all before uninitialized, so
 | 
			
		||||
     we can shorten the on-disk segment size.  */
 | 
			
		||||
  .sdata     : { *(.sdata) }
 | 
			
		||||
  _edata  =  .;
 | 
			
		||||
  PROVIDE (edata = .);
 | 
			
		||||
  __bss_start = .;
 | 
			
		||||
  .sbss      : { *(.sbss) *(.scommon) }
 | 
			
		||||
  .bss       :
 | 
			
		||||
  {
 | 
			
		||||
   *(.dynbss)
 | 
			
		||||
   *(.bss)
 | 
			
		||||
   *(COMMON)
 | 
			
		||||
  }
 | 
			
		||||
  _end = . ;
 | 
			
		||||
  PROVIDE (end = .);
 | 
			
		||||
  /* Stabs debugging sections.  */
 | 
			
		||||
  .stab 0 : { *(.stab) }
 | 
			
		||||
  .stabstr 0 : { *(.stabstr) }
 | 
			
		||||
  .stab.excl 0 : { *(.stab.excl) }
 | 
			
		||||
  .stab.exclstr 0 : { *(.stab.exclstr) }
 | 
			
		||||
  .stab.index 0 : { *(.stab.index) }
 | 
			
		||||
  .stab.indexstr 0 : { *(.stab.indexstr) }
 | 
			
		||||
  .comment 0 : { *(.comment) }
 | 
			
		||||
  /* DWARF debug sections.
 | 
			
		||||
     Symbols in the DWARF debugging sections are relative to the beginning
 | 
			
		||||
     of the section so we begin them at 0.  */
 | 
			
		||||
  /* DWARF 1 */
 | 
			
		||||
  .debug          0 : { *(.debug) }
 | 
			
		||||
  .line           0 : { *(.line) }
 | 
			
		||||
  /* GNU DWARF 1 extensions */
 | 
			
		||||
  .debug_srcinfo  0 : { *(.debug_srcinfo) }
 | 
			
		||||
  .debug_sfnames  0 : { *(.debug_sfnames) }
 | 
			
		||||
  /* DWARF 1.1 and DWARF 2 */
 | 
			
		||||
  .debug_aranges  0 : { *(.debug_aranges) }
 | 
			
		||||
  .debug_pubnames 0 : { *(.debug_pubnames) }
 | 
			
		||||
  /* DWARF 2 */
 | 
			
		||||
  .debug_info     0 : { *(.debug_info) }
 | 
			
		||||
  .debug_abbrev   0 : { *(.debug_abbrev) }
 | 
			
		||||
  .debug_line     0 : { *(.debug_line) }
 | 
			
		||||
  .debug_frame    0 : { *(.debug_frame) }
 | 
			
		||||
  .debug_str      0 : { *(.debug_str) }
 | 
			
		||||
  .debug_loc      0 : { *(.debug_loc) }
 | 
			
		||||
  .debug_macinfo  0 : { *(.debug_macinfo) }
 | 
			
		||||
  /* SGI/MIPS DWARF 2 extensions */
 | 
			
		||||
  .debug_weaknames 0 : { *(.debug_weaknames) }
 | 
			
		||||
  .debug_funcnames 0 : { *(.debug_funcnames) }
 | 
			
		||||
  .debug_typenames 0 : { *(.debug_typenames) }
 | 
			
		||||
  .debug_varnames  0 : { *(.debug_varnames) }
 | 
			
		||||
  /* These must appear regardless of  .  */
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										1418
									
								
								arch_init.c
									
									
									
									
									
								
							
							
						
						
									
										1418
									
								
								arch_init.c
									
									
									
									
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										470
									
								
								arm-semi.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										470
									
								
								arm-semi.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,470 @@
 | 
			
		||||
/*
 | 
			
		||||
 *  Arm "Angel" semihosting syscalls
 | 
			
		||||
 *
 | 
			
		||||
 *  Copyright (c) 2005, 2007 CodeSourcery.
 | 
			
		||||
 *  Written by Paul Brook.
 | 
			
		||||
 *
 | 
			
		||||
 *  This program is free software; you can redistribute it and/or modify
 | 
			
		||||
 *  it under the terms of the GNU General Public License as published by
 | 
			
		||||
 *  the Free Software Foundation; either version 2 of the License, or
 | 
			
		||||
 *  (at your option) any later version.
 | 
			
		||||
 *
 | 
			
		||||
 *  This program is distributed in the hope that it will be useful,
 | 
			
		||||
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
			
		||||
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
			
		||||
 *  GNU General Public License for more details.
 | 
			
		||||
 *
 | 
			
		||||
 *  You should have received a copy of the GNU General Public License
 | 
			
		||||
 *  along with this program; if not, write to the Free Software
 | 
			
		||||
 *  Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
 | 
			
		||||
 *  MA 02110-1301, USA.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include <sys/types.h>
 | 
			
		||||
#include <sys/stat.h>
 | 
			
		||||
#include <fcntl.h>
 | 
			
		||||
#include <unistd.h>
 | 
			
		||||
#include <stdlib.h>
 | 
			
		||||
#include <stdio.h>
 | 
			
		||||
#include <time.h>
 | 
			
		||||
 | 
			
		||||
#include "cpu.h"
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
#include "qemu.h"
 | 
			
		||||
 | 
			
		||||
#define ARM_ANGEL_HEAP_SIZE (128 * 1024 * 1024)
 | 
			
		||||
#else
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "sysemu.h"
 | 
			
		||||
#include "gdbstub.h"
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define SYS_OPEN        0x01
 | 
			
		||||
#define SYS_CLOSE       0x02
 | 
			
		||||
#define SYS_WRITEC      0x03
 | 
			
		||||
#define SYS_WRITE0      0x04
 | 
			
		||||
#define SYS_WRITE       0x05
 | 
			
		||||
#define SYS_READ        0x06
 | 
			
		||||
#define SYS_READC       0x07
 | 
			
		||||
#define SYS_ISTTY       0x09
 | 
			
		||||
#define SYS_SEEK        0x0a
 | 
			
		||||
#define SYS_FLEN        0x0c
 | 
			
		||||
#define SYS_TMPNAM      0x0d
 | 
			
		||||
#define SYS_REMOVE      0x0e
 | 
			
		||||
#define SYS_RENAME      0x0f
 | 
			
		||||
#define SYS_CLOCK       0x10
 | 
			
		||||
#define SYS_TIME        0x11
 | 
			
		||||
#define SYS_SYSTEM      0x12
 | 
			
		||||
#define SYS_ERRNO       0x13
 | 
			
		||||
#define SYS_GET_CMDLINE 0x15
 | 
			
		||||
#define SYS_HEAPINFO    0x16
 | 
			
		||||
#define SYS_EXIT        0x18
 | 
			
		||||
 | 
			
		||||
#ifndef O_BINARY
 | 
			
		||||
#define O_BINARY 0
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define GDB_O_RDONLY  0x000
 | 
			
		||||
#define GDB_O_WRONLY  0x001
 | 
			
		||||
#define GDB_O_RDWR    0x002
 | 
			
		||||
#define GDB_O_APPEND  0x008
 | 
			
		||||
#define GDB_O_CREAT   0x200
 | 
			
		||||
#define GDB_O_TRUNC   0x400
 | 
			
		||||
#define GDB_O_BINARY  0
 | 
			
		||||
 | 
			
		||||
static int gdb_open_modeflags[12] = {
 | 
			
		||||
    GDB_O_RDONLY,
 | 
			
		||||
    GDB_O_RDONLY | GDB_O_BINARY,
 | 
			
		||||
    GDB_O_RDWR,
 | 
			
		||||
    GDB_O_RDWR | GDB_O_BINARY,
 | 
			
		||||
    GDB_O_WRONLY | GDB_O_CREAT | GDB_O_TRUNC,
 | 
			
		||||
    GDB_O_WRONLY | GDB_O_CREAT | GDB_O_TRUNC | GDB_O_BINARY,
 | 
			
		||||
    GDB_O_RDWR | GDB_O_CREAT | GDB_O_TRUNC,
 | 
			
		||||
    GDB_O_RDWR | GDB_O_CREAT | GDB_O_TRUNC | GDB_O_BINARY,
 | 
			
		||||
    GDB_O_WRONLY | GDB_O_CREAT | GDB_O_APPEND,
 | 
			
		||||
    GDB_O_WRONLY | GDB_O_CREAT | GDB_O_APPEND | GDB_O_BINARY,
 | 
			
		||||
    GDB_O_RDWR | GDB_O_CREAT | GDB_O_APPEND,
 | 
			
		||||
    GDB_O_RDWR | GDB_O_CREAT | GDB_O_APPEND | GDB_O_BINARY
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int open_modeflags[12] = {
 | 
			
		||||
    O_RDONLY,
 | 
			
		||||
    O_RDONLY | O_BINARY,
 | 
			
		||||
    O_RDWR,
 | 
			
		||||
    O_RDWR | O_BINARY,
 | 
			
		||||
    O_WRONLY | O_CREAT | O_TRUNC,
 | 
			
		||||
    O_WRONLY | O_CREAT | O_TRUNC | O_BINARY,
 | 
			
		||||
    O_RDWR | O_CREAT | O_TRUNC,
 | 
			
		||||
    O_RDWR | O_CREAT | O_TRUNC | O_BINARY,
 | 
			
		||||
    O_WRONLY | O_CREAT | O_APPEND,
 | 
			
		||||
    O_WRONLY | O_CREAT | O_APPEND | O_BINARY,
 | 
			
		||||
    O_RDWR | O_CREAT | O_APPEND,
 | 
			
		||||
    O_RDWR | O_CREAT | O_APPEND | O_BINARY
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
static inline uint32_t set_swi_errno(TaskState *ts, uint32_t code)
 | 
			
		||||
{
 | 
			
		||||
    if (code == (uint32_t)-1)
 | 
			
		||||
        ts->swi_errno = errno;
 | 
			
		||||
    return code;
 | 
			
		||||
}
 | 
			
		||||
#else
 | 
			
		||||
static inline uint32_t set_swi_errno(CPUState *env, uint32_t code)
 | 
			
		||||
{
 | 
			
		||||
    return code;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#include "softmmu-semi.h"
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static target_ulong arm_semi_syscall_len;
 | 
			
		||||
 | 
			
		||||
#if !defined(CONFIG_USER_ONLY)
 | 
			
		||||
static target_ulong syscall_err;
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static void arm_semi_cb(CPUState *env, target_ulong ret, target_ulong err)
 | 
			
		||||
{
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
    TaskState *ts = env->opaque;
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    if (ret == (target_ulong)-1) {
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
        ts->swi_errno = err;
 | 
			
		||||
#else
 | 
			
		||||
	syscall_err = err;
 | 
			
		||||
#endif
 | 
			
		||||
        env->regs[0] = ret;
 | 
			
		||||
    } else {
 | 
			
		||||
        /* Fixup syscalls that use nonstardard return conventions.  */
 | 
			
		||||
        switch (env->regs[0]) {
 | 
			
		||||
        case SYS_WRITE:
 | 
			
		||||
        case SYS_READ:
 | 
			
		||||
            env->regs[0] = arm_semi_syscall_len - ret;
 | 
			
		||||
            break;
 | 
			
		||||
        case SYS_SEEK:
 | 
			
		||||
            env->regs[0] = 0;
 | 
			
		||||
            break;
 | 
			
		||||
        default:
 | 
			
		||||
            env->regs[0] = ret;
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void arm_semi_flen_cb(CPUState *env, target_ulong ret, target_ulong err)
 | 
			
		||||
{
 | 
			
		||||
    /* The size is always stored in big-endian order, extract
 | 
			
		||||
       the value. We assume the size always fit in 32 bits.  */
 | 
			
		||||
    uint32_t size;
 | 
			
		||||
    cpu_memory_rw_debug(env, env->regs[13]-64+32, (uint8_t *)&size, 4, 0);
 | 
			
		||||
    env->regs[0] = be32_to_cpu(size);
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
    ((TaskState *)env->opaque)->swi_errno = err;
 | 
			
		||||
#else
 | 
			
		||||
    syscall_err = err;
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#define ARG(n)					\
 | 
			
		||||
({						\
 | 
			
		||||
    target_ulong __arg;				\
 | 
			
		||||
    /* FIXME - handle get_user() failure */	\
 | 
			
		||||
    get_user_ual(__arg, args + (n) * 4);	\
 | 
			
		||||
    __arg;					\
 | 
			
		||||
})
 | 
			
		||||
#define SET_ARG(n, val) put_user_ual(val, args + (n) * 4)
 | 
			
		||||
uint32_t do_arm_semihosting(CPUState *env)
 | 
			
		||||
{
 | 
			
		||||
    target_ulong args;
 | 
			
		||||
    char * s;
 | 
			
		||||
    int nr;
 | 
			
		||||
    uint32_t ret;
 | 
			
		||||
    uint32_t len;
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
    TaskState *ts = env->opaque;
 | 
			
		||||
#else
 | 
			
		||||
    CPUState *ts = env;
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    nr = env->regs[0];
 | 
			
		||||
    args = env->regs[1];
 | 
			
		||||
    switch (nr) {
 | 
			
		||||
    case SYS_OPEN:
 | 
			
		||||
        if (!(s = lock_user_string(ARG(0))))
 | 
			
		||||
            /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
            return (uint32_t)-1;
 | 
			
		||||
        if (ARG(1) >= 12)
 | 
			
		||||
            return (uint32_t)-1;
 | 
			
		||||
        if (strcmp(s, ":tt") == 0) {
 | 
			
		||||
            if (ARG(1) < 4)
 | 
			
		||||
                return STDIN_FILENO;
 | 
			
		||||
            else
 | 
			
		||||
                return STDOUT_FILENO;
 | 
			
		||||
        }
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "open,%s,%x,1a4", ARG(0),
 | 
			
		||||
			   (int)ARG(2)+1, gdb_open_modeflags[ARG(1)]);
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = set_swi_errno(ts, open(s, open_modeflags[ARG(1)], 0644));
 | 
			
		||||
        }
 | 
			
		||||
        unlock_user(s, ARG(0), 0);
 | 
			
		||||
        return ret;
 | 
			
		||||
    case SYS_CLOSE:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "close,%x", ARG(0));
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            return set_swi_errno(ts, close(ARG(0)));
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_WRITEC:
 | 
			
		||||
        {
 | 
			
		||||
          char c;
 | 
			
		||||
 | 
			
		||||
          if (get_user_u8(c, args))
 | 
			
		||||
              /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
              return (uint32_t)-1;
 | 
			
		||||
          /* Write to debug console.  stderr is near enough.  */
 | 
			
		||||
          if (use_gdb_syscalls()) {
 | 
			
		||||
                gdb_do_syscall(arm_semi_cb, "write,2,%x,1", args);
 | 
			
		||||
                return env->regs[0];
 | 
			
		||||
          } else {
 | 
			
		||||
                return write(STDERR_FILENO, &c, 1);
 | 
			
		||||
          }
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_WRITE0:
 | 
			
		||||
        if (!(s = lock_user_string(args)))
 | 
			
		||||
            /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
            return (uint32_t)-1;
 | 
			
		||||
        len = strlen(s);
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "write,2,%x,%x\n", args, len);
 | 
			
		||||
            ret = env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = write(STDERR_FILENO, s, len);
 | 
			
		||||
        }
 | 
			
		||||
        unlock_user(s, args, 0);
 | 
			
		||||
        return ret;
 | 
			
		||||
    case SYS_WRITE:
 | 
			
		||||
        len = ARG(2);
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            arm_semi_syscall_len = len;
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "write,%x,%x,%x", ARG(0), ARG(1), len);
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            if (!(s = lock_user(VERIFY_READ, ARG(1), len, 1)))
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
            ret = set_swi_errno(ts, write(ARG(0), s, len));
 | 
			
		||||
            unlock_user(s, ARG(1), 0);
 | 
			
		||||
            if (ret == (uint32_t)-1)
 | 
			
		||||
                return -1;
 | 
			
		||||
            return len - ret;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_READ:
 | 
			
		||||
        len = ARG(2);
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            arm_semi_syscall_len = len;
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "read,%x,%x,%x", ARG(0), ARG(1), len);
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            if (!(s = lock_user(VERIFY_WRITE, ARG(1), len, 0)))
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
            do
 | 
			
		||||
              ret = set_swi_errno(ts, read(ARG(0), s, len));
 | 
			
		||||
            while (ret == -1 && errno == EINTR);
 | 
			
		||||
            unlock_user(s, ARG(1), len);
 | 
			
		||||
            if (ret == (uint32_t)-1)
 | 
			
		||||
                return -1;
 | 
			
		||||
            return len - ret;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_READC:
 | 
			
		||||
       /* XXX: Read from debug cosole. Not implemented.  */
 | 
			
		||||
        return 0;
 | 
			
		||||
    case SYS_ISTTY:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "isatty,%x", ARG(0));
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            return isatty(ARG(0));
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_SEEK:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "lseek,%x,%x,0", ARG(0), ARG(1));
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = set_swi_errno(ts, lseek(ARG(0), ARG(1), SEEK_SET));
 | 
			
		||||
            if (ret == (uint32_t)-1)
 | 
			
		||||
              return -1;
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_FLEN:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_flen_cb, "fstat,%x,%x",
 | 
			
		||||
			   ARG(0), env->regs[13]-64);
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            struct stat buf;
 | 
			
		||||
            ret = set_swi_errno(ts, fstat(ARG(0), &buf));
 | 
			
		||||
            if (ret == (uint32_t)-1)
 | 
			
		||||
                return -1;
 | 
			
		||||
            return buf.st_size;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_TMPNAM:
 | 
			
		||||
        /* XXX: Not implemented.  */
 | 
			
		||||
        return -1;
 | 
			
		||||
    case SYS_REMOVE:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "unlink,%s", ARG(0), (int)ARG(1)+1);
 | 
			
		||||
            ret = env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            if (!(s = lock_user_string(ARG(0))))
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
            ret =  set_swi_errno(ts, remove(s));
 | 
			
		||||
            unlock_user(s, ARG(0), 0);
 | 
			
		||||
        }
 | 
			
		||||
        return ret;
 | 
			
		||||
    case SYS_RENAME:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "rename,%s,%s",
 | 
			
		||||
                           ARG(0), (int)ARG(1)+1, ARG(2), (int)ARG(3)+1);
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            char *s2;
 | 
			
		||||
            s = lock_user_string(ARG(0));
 | 
			
		||||
            s2 = lock_user_string(ARG(2));
 | 
			
		||||
            if (!s || !s2)
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                ret = (uint32_t)-1;
 | 
			
		||||
            else
 | 
			
		||||
                ret = set_swi_errno(ts, rename(s, s2));
 | 
			
		||||
            if (s2)
 | 
			
		||||
                unlock_user(s2, ARG(2), 0);
 | 
			
		||||
            if (s)
 | 
			
		||||
                unlock_user(s, ARG(0), 0);
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_CLOCK:
 | 
			
		||||
        return clock() / (CLOCKS_PER_SEC / 100);
 | 
			
		||||
    case SYS_TIME:
 | 
			
		||||
        return set_swi_errno(ts, time(NULL));
 | 
			
		||||
    case SYS_SYSTEM:
 | 
			
		||||
        if (use_gdb_syscalls()) {
 | 
			
		||||
            gdb_do_syscall(arm_semi_cb, "system,%s", ARG(0), (int)ARG(1)+1);
 | 
			
		||||
            return env->regs[0];
 | 
			
		||||
        } else {
 | 
			
		||||
            if (!(s = lock_user_string(ARG(0))))
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
            ret = set_swi_errno(ts, system(s));
 | 
			
		||||
            unlock_user(s, ARG(0), 0);
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_ERRNO:
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
        return ts->swi_errno;
 | 
			
		||||
#else
 | 
			
		||||
        return syscall_err;
 | 
			
		||||
#endif
 | 
			
		||||
    case SYS_GET_CMDLINE:
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
        /* Build a commandline from the original argv.  */
 | 
			
		||||
        {
 | 
			
		||||
            char **arg = ts->info->host_argv;
 | 
			
		||||
            int len = ARG(1);
 | 
			
		||||
            /* lock the buffer on the ARM side */
 | 
			
		||||
            char *cmdline_buffer = (char*)lock_user(VERIFY_WRITE, ARG(0), len, 0);
 | 
			
		||||
 | 
			
		||||
            if (!cmdline_buffer)
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
 | 
			
		||||
            s = cmdline_buffer;
 | 
			
		||||
            while (*arg && len > 2) {
 | 
			
		||||
                int n = strlen(*arg);
 | 
			
		||||
 | 
			
		||||
                if (s != cmdline_buffer) {
 | 
			
		||||
                    *(s++) = ' ';
 | 
			
		||||
                    len--;
 | 
			
		||||
                }
 | 
			
		||||
                if (n >= len)
 | 
			
		||||
                    n = len - 1;
 | 
			
		||||
                memcpy(s, *arg, n);
 | 
			
		||||
                s += n;
 | 
			
		||||
                len -= n;
 | 
			
		||||
                arg++;
 | 
			
		||||
            }
 | 
			
		||||
            /* Null terminate the string.  */
 | 
			
		||||
            *s = 0;
 | 
			
		||||
            len = s - cmdline_buffer;
 | 
			
		||||
 | 
			
		||||
            /* Unlock the buffer on the ARM side.  */
 | 
			
		||||
            unlock_user(cmdline_buffer, ARG(0), len);
 | 
			
		||||
 | 
			
		||||
            /* Adjust the commandline length argument.  */
 | 
			
		||||
            SET_ARG(1, len);
 | 
			
		||||
 | 
			
		||||
            /* Return success if commandline fit into buffer.  */
 | 
			
		||||
            return *arg ? -1 : 0;
 | 
			
		||||
        }
 | 
			
		||||
#else
 | 
			
		||||
      return -1;
 | 
			
		||||
#endif
 | 
			
		||||
    case SYS_HEAPINFO:
 | 
			
		||||
        {
 | 
			
		||||
            uint32_t *ptr;
 | 
			
		||||
            uint32_t limit;
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_USER_ONLY
 | 
			
		||||
            /* Some C libraries assume the heap immediately follows .bss, so
 | 
			
		||||
               allocate it using sbrk.  */
 | 
			
		||||
            if (!ts->heap_limit) {
 | 
			
		||||
                long ret;
 | 
			
		||||
 | 
			
		||||
                ts->heap_base = do_brk(0);
 | 
			
		||||
                limit = ts->heap_base + ARM_ANGEL_HEAP_SIZE;
 | 
			
		||||
                /* Try a big heap, and reduce the size if that fails.  */
 | 
			
		||||
                for (;;) {
 | 
			
		||||
                    ret = do_brk(limit);
 | 
			
		||||
                    if (ret != -1)
 | 
			
		||||
                        break;
 | 
			
		||||
                    limit = (ts->heap_base >> 1) + (limit >> 1);
 | 
			
		||||
                }
 | 
			
		||||
                ts->heap_limit = limit;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (!(ptr = lock_user(VERIFY_WRITE, ARG(0), 16, 0)))
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
            ptr[0] = tswap32(ts->heap_base);
 | 
			
		||||
            ptr[1] = tswap32(ts->heap_limit);
 | 
			
		||||
            ptr[2] = tswap32(ts->stack_base);
 | 
			
		||||
            ptr[3] = tswap32(0); /* Stack limit.  */
 | 
			
		||||
            unlock_user(ptr, ARG(0), 16);
 | 
			
		||||
#else
 | 
			
		||||
            limit = ram_size;
 | 
			
		||||
            if (!(ptr = lock_user(VERIFY_WRITE, ARG(0), 16, 0)))
 | 
			
		||||
                /* FIXME - should this error code be -TARGET_EFAULT ? */
 | 
			
		||||
                return (uint32_t)-1;
 | 
			
		||||
            /* TODO: Make this use the limit of the loaded application.  */
 | 
			
		||||
            ptr[0] = tswap32(limit / 2);
 | 
			
		||||
            ptr[1] = tswap32(limit);
 | 
			
		||||
            ptr[2] = tswap32(limit); /* Stack base */
 | 
			
		||||
            ptr[3] = tswap32(0); /* Stack limit.  */
 | 
			
		||||
            unlock_user(ptr, ARG(0), 16);
 | 
			
		||||
#endif
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
    case SYS_EXIT:
 | 
			
		||||
        exit(0);
 | 
			
		||||
    default:
 | 
			
		||||
        fprintf(stderr, "qemu: Unsupported SemiHosting SWI 0x%02x\n", nr);
 | 
			
		||||
        cpu_dump_state(env, stderr, fprintf, 0);
 | 
			
		||||
        abort();
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										154
									
								
								arm.ld
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										154
									
								
								arm.ld
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,154 @@
 | 
			
		||||
OUTPUT_FORMAT("elf32-littlearm", "elf32-littlearm",
 | 
			
		||||
	      "elf32-littlearm")
 | 
			
		||||
OUTPUT_ARCH(arm)
 | 
			
		||||
ENTRY(_start)
 | 
			
		||||
SEARCH_DIR(/lib); SEARCH_DIR(/usr/lib); SEARCH_DIR(/usr/local/lib); SEARCH_DIR(/usr/alpha-unknown-linux-gnu/lib);
 | 
			
		||||
SECTIONS
 | 
			
		||||
{
 | 
			
		||||
  /* Read-only sections, merged into text segment: */
 | 
			
		||||
  . = 0x60000000 + SIZEOF_HEADERS;
 | 
			
		||||
  .interp     : { *(.interp) 	}
 | 
			
		||||
  .hash          : { *(.hash)		}
 | 
			
		||||
  .dynsym        : { *(.dynsym)		}
 | 
			
		||||
  .dynstr        : { *(.dynstr)		}
 | 
			
		||||
  .gnu.version   : { *(.gnu.version)	}
 | 
			
		||||
  .gnu.version_d   : { *(.gnu.version_d)	}
 | 
			
		||||
  .gnu.version_r   : { *(.gnu.version_r)	}
 | 
			
		||||
  .rel.text      :
 | 
			
		||||
    { *(.rel.text) *(.rel.gnu.linkonce.t*) }
 | 
			
		||||
  .rela.text     :
 | 
			
		||||
    { *(.rela.text) *(.rela.gnu.linkonce.t*) }
 | 
			
		||||
  .rel.data      :
 | 
			
		||||
    { *(.rel.data) *(.rel.gnu.linkonce.d*) }
 | 
			
		||||
  .rela.data     :
 | 
			
		||||
    { *(.rela.data) *(.rela.gnu.linkonce.d*) }
 | 
			
		||||
  .rel.rodata    :
 | 
			
		||||
    { *(.rel.rodata) *(.rel.gnu.linkonce.r*) }
 | 
			
		||||
  .rela.rodata   :
 | 
			
		||||
    { *(.rela.rodata) *(.rela.gnu.linkonce.r*) }
 | 
			
		||||
  .rel.got       : { *(.rel.got)		}
 | 
			
		||||
  .rela.got      : { *(.rela.got)		}
 | 
			
		||||
  .rel.ctors     : { *(.rel.ctors)	}
 | 
			
		||||
  .rela.ctors    : { *(.rela.ctors)	}
 | 
			
		||||
  .rel.dtors     : { *(.rel.dtors)	}
 | 
			
		||||
  .rela.dtors    : { *(.rela.dtors)	}
 | 
			
		||||
  .rel.init      : { *(.rel.init)	}
 | 
			
		||||
  .rela.init     : { *(.rela.init)	}
 | 
			
		||||
  .rel.fini      : { *(.rel.fini)	}
 | 
			
		||||
  .rela.fini     : { *(.rela.fini)	}
 | 
			
		||||
  .rel.bss       : { *(.rel.bss)		}
 | 
			
		||||
  .rela.bss      : { *(.rela.bss)		}
 | 
			
		||||
  .rel.plt       : { *(.rel.plt)		}
 | 
			
		||||
  .rela.plt      : { *(.rela.plt)		}
 | 
			
		||||
  .init          : { *(.init)	} =0x47ff041f
 | 
			
		||||
  .text      :
 | 
			
		||||
  {
 | 
			
		||||
    *(.text)
 | 
			
		||||
    /* .gnu.warning sections are handled specially by elf32.em.  */
 | 
			
		||||
    *(.gnu.warning)
 | 
			
		||||
    *(.gnu.linkonce.t*)
 | 
			
		||||
  } =0x47ff041f
 | 
			
		||||
  _etext = .;
 | 
			
		||||
  PROVIDE (etext = .);
 | 
			
		||||
  .fini      : { *(.fini)    } =0x47ff041f
 | 
			
		||||
  .rodata    : { *(.rodata) *(.gnu.linkonce.r*) }
 | 
			
		||||
  .rodata1   : { *(.rodata1) }
 | 
			
		||||
  .ARM.extab   : { *(.ARM.extab* .gnu.linkonce.armextab.*) }
 | 
			
		||||
   __exidx_start = .;
 | 
			
		||||
  .ARM.exidx   : { *(.ARM.exidx* .gnu.linkonce.armexidx.*) }
 | 
			
		||||
   __exidx_end = .;
 | 
			
		||||
  .reginfo : { *(.reginfo) }
 | 
			
		||||
  /* Adjust the address for the data segment.  We want to adjust up to
 | 
			
		||||
     the same address within the page on the next page up.  */
 | 
			
		||||
  . = ALIGN(0x100000) + (. & (0x100000 - 1));
 | 
			
		||||
  .data    :
 | 
			
		||||
  {
 | 
			
		||||
    *(.gen_code)
 | 
			
		||||
    *(.data)
 | 
			
		||||
    *(.gnu.linkonce.d*)
 | 
			
		||||
    CONSTRUCTORS
 | 
			
		||||
  }
 | 
			
		||||
  .tbss           : { *(.tbss .tbss.* .gnu.linkonce.tb.*) *(.tcommon) }
 | 
			
		||||
  .data1   : { *(.data1) }
 | 
			
		||||
  .preinit_array     :
 | 
			
		||||
  {
 | 
			
		||||
    PROVIDE_HIDDEN (__preinit_array_start = .);
 | 
			
		||||
    KEEP (*(.preinit_array))
 | 
			
		||||
    PROVIDE_HIDDEN (__preinit_array_end = .);
 | 
			
		||||
  }
 | 
			
		||||
  .init_array     :
 | 
			
		||||
  {
 | 
			
		||||
     PROVIDE_HIDDEN (__init_array_start = .);
 | 
			
		||||
     KEEP (*(SORT(.init_array.*)))
 | 
			
		||||
     KEEP (*(.init_array))
 | 
			
		||||
     PROVIDE_HIDDEN (__init_array_end = .);
 | 
			
		||||
  }
 | 
			
		||||
  .fini_array     :
 | 
			
		||||
  {
 | 
			
		||||
    PROVIDE_HIDDEN (__fini_array_start = .);
 | 
			
		||||
    KEEP (*(.fini_array))
 | 
			
		||||
    KEEP (*(SORT(.fini_array.*)))
 | 
			
		||||
    PROVIDE_HIDDEN (__fini_array_end = .);
 | 
			
		||||
  }
 | 
			
		||||
  .ctors         :
 | 
			
		||||
  {
 | 
			
		||||
    *(.ctors)
 | 
			
		||||
  }
 | 
			
		||||
  .dtors         :
 | 
			
		||||
  {
 | 
			
		||||
    *(.dtors)
 | 
			
		||||
  }
 | 
			
		||||
  .plt      : { *(.plt)	}
 | 
			
		||||
  .got           : { *(.got.plt) *(.got) }
 | 
			
		||||
  .dynamic       : { *(.dynamic) }
 | 
			
		||||
  /* We want the small data sections together, so single-instruction offsets
 | 
			
		||||
     can access them all, and initialized data all before uninitialized, so
 | 
			
		||||
     we can shorten the on-disk segment size.  */
 | 
			
		||||
  .sdata     : { *(.sdata) }
 | 
			
		||||
  _edata  =  .;
 | 
			
		||||
  PROVIDE (edata = .);
 | 
			
		||||
  __bss_start = .;
 | 
			
		||||
  .sbss      : { *(.sbss) *(.scommon) }
 | 
			
		||||
  .bss       :
 | 
			
		||||
  {
 | 
			
		||||
   *(.dynbss)
 | 
			
		||||
   *(.bss)
 | 
			
		||||
   *(COMMON)
 | 
			
		||||
  }
 | 
			
		||||
  _end = . ;
 | 
			
		||||
  PROVIDE (end = .);
 | 
			
		||||
  /* Stabs debugging sections.  */
 | 
			
		||||
  .stab 0 : { *(.stab) }
 | 
			
		||||
  .stabstr 0 : { *(.stabstr) }
 | 
			
		||||
  .stab.excl 0 : { *(.stab.excl) }
 | 
			
		||||
  .stab.exclstr 0 : { *(.stab.exclstr) }
 | 
			
		||||
  .stab.index 0 : { *(.stab.index) }
 | 
			
		||||
  .stab.indexstr 0 : { *(.stab.indexstr) }
 | 
			
		||||
  .comment 0 : { *(.comment) }
 | 
			
		||||
  /* DWARF debug sections.
 | 
			
		||||
     Symbols in the DWARF debugging sections are relative to the beginning
 | 
			
		||||
     of the section so we begin them at 0.  */
 | 
			
		||||
  /* DWARF 1 */
 | 
			
		||||
  .debug          0 : { *(.debug) }
 | 
			
		||||
  .line           0 : { *(.line) }
 | 
			
		||||
  /* GNU DWARF 1 extensions */
 | 
			
		||||
  .debug_srcinfo  0 : { *(.debug_srcinfo) }
 | 
			
		||||
  .debug_sfnames  0 : { *(.debug_sfnames) }
 | 
			
		||||
  /* DWARF 1.1 and DWARF 2 */
 | 
			
		||||
  .debug_aranges  0 : { *(.debug_aranges) }
 | 
			
		||||
  .debug_pubnames 0 : { *(.debug_pubnames) }
 | 
			
		||||
  /* DWARF 2 */
 | 
			
		||||
  .debug_info     0 : { *(.debug_info) }
 | 
			
		||||
  .debug_abbrev   0 : { *(.debug_abbrev) }
 | 
			
		||||
  .debug_line     0 : { *(.debug_line) }
 | 
			
		||||
  .debug_frame    0 : { *(.debug_frame) }
 | 
			
		||||
  .debug_str      0 : { *(.debug_str) }
 | 
			
		||||
  .debug_loc      0 : { *(.debug_loc) }
 | 
			
		||||
  .debug_macinfo  0 : { *(.debug_macinfo) }
 | 
			
		||||
  /* SGI/MIPS DWARF 2 extensions */
 | 
			
		||||
  .debug_weaknames 0 : { *(.debug_weaknames) }
 | 
			
		||||
  .debug_funcnames 0 : { *(.debug_funcnames) }
 | 
			
		||||
  .debug_typenames 0 : { *(.debug_typenames) }
 | 
			
		||||
  .debug_varnames  0 : { *(.debug_varnames) }
 | 
			
		||||
  /* These must appear regardless of  .  */
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										318
									
								
								async.c
									
									
									
									
									
								
							
							
						
						
									
										318
									
								
								async.c
									
									
									
									
									
								
							@@ -1,318 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU System Emulator
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2003-2008 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/aio.h"
 | 
			
		||||
#include "block/thread-pool.h"
 | 
			
		||||
#include "qemu/main-loop.h"
 | 
			
		||||
#include "qemu/atomic.h"
 | 
			
		||||
 | 
			
		||||
/***********************************************************/
 | 
			
		||||
/* bottom halves (can be seen as timers which expire ASAP) */
 | 
			
		||||
 | 
			
		||||
struct QEMUBH {
 | 
			
		||||
    AioContext *ctx;
 | 
			
		||||
    QEMUBHFunc *cb;
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    QEMUBH *next;
 | 
			
		||||
    bool scheduled;
 | 
			
		||||
    bool idle;
 | 
			
		||||
    bool deleted;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
QEMUBH *aio_bh_new(AioContext *ctx, QEMUBHFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
    bh = g_malloc0(sizeof(QEMUBH));
 | 
			
		||||
    bh->ctx = ctx;
 | 
			
		||||
    bh->cb = cb;
 | 
			
		||||
    bh->opaque = opaque;
 | 
			
		||||
    qemu_mutex_lock(&ctx->bh_lock);
 | 
			
		||||
    bh->next = ctx->first_bh;
 | 
			
		||||
    /* Make sure that the members are ready before putting bh into list */
 | 
			
		||||
    smp_wmb();
 | 
			
		||||
    ctx->first_bh = bh;
 | 
			
		||||
    qemu_mutex_unlock(&ctx->bh_lock);
 | 
			
		||||
    return bh;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Multiple occurrences of aio_bh_poll cannot be called concurrently */
 | 
			
		||||
int aio_bh_poll(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    QEMUBH *bh, **bhp, *next;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ctx->walking_bh++;
 | 
			
		||||
 | 
			
		||||
    ret = 0;
 | 
			
		||||
    for (bh = ctx->first_bh; bh; bh = next) {
 | 
			
		||||
        /* Make sure that fetching bh happens before accessing its members */
 | 
			
		||||
        smp_read_barrier_depends();
 | 
			
		||||
        next = bh->next;
 | 
			
		||||
        if (!bh->deleted && bh->scheduled) {
 | 
			
		||||
            bh->scheduled = 0;
 | 
			
		||||
            /* Paired with write barrier in bh schedule to ensure reading for
 | 
			
		||||
             * idle & callbacks coming after bh's scheduling.
 | 
			
		||||
             */
 | 
			
		||||
            smp_rmb();
 | 
			
		||||
            if (!bh->idle)
 | 
			
		||||
                ret = 1;
 | 
			
		||||
            bh->idle = 0;
 | 
			
		||||
            bh->cb(bh->opaque);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ctx->walking_bh--;
 | 
			
		||||
 | 
			
		||||
    /* remove deleted bhs */
 | 
			
		||||
    if (!ctx->walking_bh) {
 | 
			
		||||
        qemu_mutex_lock(&ctx->bh_lock);
 | 
			
		||||
        bhp = &ctx->first_bh;
 | 
			
		||||
        while (*bhp) {
 | 
			
		||||
            bh = *bhp;
 | 
			
		||||
            if (bh->deleted) {
 | 
			
		||||
                *bhp = bh->next;
 | 
			
		||||
                g_free(bh);
 | 
			
		||||
            } else {
 | 
			
		||||
                bhp = &bh->next;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        qemu_mutex_unlock(&ctx->bh_lock);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void qemu_bh_schedule_idle(QEMUBH *bh)
 | 
			
		||||
{
 | 
			
		||||
    if (bh->scheduled)
 | 
			
		||||
        return;
 | 
			
		||||
    bh->idle = 1;
 | 
			
		||||
    /* Make sure that idle & any writes needed by the callback are done
 | 
			
		||||
     * before the locations are read in the aio_bh_poll.
 | 
			
		||||
     */
 | 
			
		||||
    smp_wmb();
 | 
			
		||||
    bh->scheduled = 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void qemu_bh_schedule(QEMUBH *bh)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *ctx;
 | 
			
		||||
 | 
			
		||||
    if (bh->scheduled)
 | 
			
		||||
        return;
 | 
			
		||||
    ctx = bh->ctx;
 | 
			
		||||
    bh->idle = 0;
 | 
			
		||||
    /* Make sure that:
 | 
			
		||||
     * 1. idle & any writes needed by the callback are done before the
 | 
			
		||||
     *    locations are read in the aio_bh_poll.
 | 
			
		||||
     * 2. ctx is loaded before scheduled is set and the callback has a chance
 | 
			
		||||
     *    to execute.
 | 
			
		||||
     */
 | 
			
		||||
    smp_mb();
 | 
			
		||||
    bh->scheduled = 1;
 | 
			
		||||
    aio_notify(ctx);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/* This func is async.
 | 
			
		||||
 */
 | 
			
		||||
void qemu_bh_cancel(QEMUBH *bh)
 | 
			
		||||
{
 | 
			
		||||
    bh->scheduled = 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* This func is async.The bottom half will do the delete action at the finial
 | 
			
		||||
 * end.
 | 
			
		||||
 */
 | 
			
		||||
void qemu_bh_delete(QEMUBH *bh)
 | 
			
		||||
{
 | 
			
		||||
    bh->scheduled = 0;
 | 
			
		||||
    bh->deleted = 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static gboolean
 | 
			
		||||
aio_ctx_prepare(GSource *source, gint    *timeout)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *ctx = (AioContext *) source;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
    int deadline;
 | 
			
		||||
 | 
			
		||||
    /* We assume there is no timeout already supplied */
 | 
			
		||||
    *timeout = -1;
 | 
			
		||||
    for (bh = ctx->first_bh; bh; bh = bh->next) {
 | 
			
		||||
        if (!bh->deleted && bh->scheduled) {
 | 
			
		||||
            if (bh->idle) {
 | 
			
		||||
                /* idle bottom halves will be polled at least
 | 
			
		||||
                 * every 10ms */
 | 
			
		||||
                *timeout = 10;
 | 
			
		||||
            } else {
 | 
			
		||||
                /* non-idle bottom halves will be executed
 | 
			
		||||
                 * immediately */
 | 
			
		||||
                *timeout = 0;
 | 
			
		||||
                return true;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    deadline = qemu_timeout_ns_to_ms(timerlistgroup_deadline_ns(&ctx->tlg));
 | 
			
		||||
    if (deadline == 0) {
 | 
			
		||||
        *timeout = 0;
 | 
			
		||||
        return true;
 | 
			
		||||
    } else {
 | 
			
		||||
        *timeout = qemu_soonest_timeout(*timeout, deadline);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return false;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static gboolean
 | 
			
		||||
aio_ctx_check(GSource *source)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *ctx = (AioContext *) source;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
 | 
			
		||||
    for (bh = ctx->first_bh; bh; bh = bh->next) {
 | 
			
		||||
        if (!bh->deleted && bh->scheduled) {
 | 
			
		||||
            return true;
 | 
			
		||||
	}
 | 
			
		||||
    }
 | 
			
		||||
    return aio_pending(ctx) || (timerlistgroup_deadline_ns(&ctx->tlg) == 0);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static gboolean
 | 
			
		||||
aio_ctx_dispatch(GSource     *source,
 | 
			
		||||
                 GSourceFunc  callback,
 | 
			
		||||
                 gpointer     user_data)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *ctx = (AioContext *) source;
 | 
			
		||||
 | 
			
		||||
    assert(callback == NULL);
 | 
			
		||||
    aio_poll(ctx, false);
 | 
			
		||||
    return true;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
aio_ctx_finalize(GSource     *source)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *ctx = (AioContext *) source;
 | 
			
		||||
 | 
			
		||||
    thread_pool_free(ctx->thread_pool);
 | 
			
		||||
    aio_set_event_notifier(ctx, &ctx->notifier, NULL);
 | 
			
		||||
    event_notifier_cleanup(&ctx->notifier);
 | 
			
		||||
    rfifolock_destroy(&ctx->lock);
 | 
			
		||||
    qemu_mutex_destroy(&ctx->bh_lock);
 | 
			
		||||
    g_array_free(ctx->pollfds, TRUE);
 | 
			
		||||
    timerlistgroup_deinit(&ctx->tlg);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static GSourceFuncs aio_source_funcs = {
 | 
			
		||||
    aio_ctx_prepare,
 | 
			
		||||
    aio_ctx_check,
 | 
			
		||||
    aio_ctx_dispatch,
 | 
			
		||||
    aio_ctx_finalize
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
GSource *aio_get_g_source(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    g_source_ref(&ctx->source);
 | 
			
		||||
    return &ctx->source;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
ThreadPool *aio_get_thread_pool(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    if (!ctx->thread_pool) {
 | 
			
		||||
        ctx->thread_pool = thread_pool_new(ctx);
 | 
			
		||||
    }
 | 
			
		||||
    return ctx->thread_pool;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_set_dispatching(AioContext *ctx, bool dispatching)
 | 
			
		||||
{
 | 
			
		||||
    ctx->dispatching = dispatching;
 | 
			
		||||
    if (!dispatching) {
 | 
			
		||||
        /* Write ctx->dispatching before reading e.g. bh->scheduled.
 | 
			
		||||
         * Optimization: this is only needed when we're entering the "unsafe"
 | 
			
		||||
         * phase where other threads must call event_notifier_set.
 | 
			
		||||
         */
 | 
			
		||||
        smp_mb();
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_notify(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    /* Write e.g. bh->scheduled before reading ctx->dispatching.  */
 | 
			
		||||
    smp_mb();
 | 
			
		||||
    if (!ctx->dispatching) {
 | 
			
		||||
        event_notifier_set(&ctx->notifier);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void aio_timerlist_notify(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    aio_notify(opaque);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void aio_rfifolock_cb(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    /* Kick owner thread in case they are blocked in aio_poll() */
 | 
			
		||||
    aio_notify(opaque);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
AioContext *aio_context_new(void)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *ctx;
 | 
			
		||||
    ctx = (AioContext *) g_source_new(&aio_source_funcs, sizeof(AioContext));
 | 
			
		||||
    ctx->pollfds = g_array_new(FALSE, FALSE, sizeof(GPollFD));
 | 
			
		||||
    ctx->thread_pool = NULL;
 | 
			
		||||
    qemu_mutex_init(&ctx->bh_lock);
 | 
			
		||||
    rfifolock_init(&ctx->lock, aio_rfifolock_cb, ctx);
 | 
			
		||||
    event_notifier_init(&ctx->notifier, false);
 | 
			
		||||
    aio_set_event_notifier(ctx, &ctx->notifier, 
 | 
			
		||||
                           (EventNotifierHandler *)
 | 
			
		||||
                           event_notifier_test_and_clear);
 | 
			
		||||
    timerlistgroup_init(&ctx->tlg, aio_timerlist_notify, ctx);
 | 
			
		||||
 | 
			
		||||
    return ctx;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_context_ref(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    g_source_ref(&ctx->source);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_context_unref(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    g_source_unref(&ctx->source);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_context_acquire(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    rfifolock_lock(&ctx->lock);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void aio_context_release(AioContext *ctx)
 | 
			
		||||
{
 | 
			
		||||
    rfifolock_unlock(&ctx->lock);
 | 
			
		||||
}
 | 
			
		||||
@@ -1,17 +0,0 @@
 | 
			
		||||
common-obj-y = audio.o noaudio.o wavaudio.o mixeng.o
 | 
			
		||||
common-obj-$(CONFIG_SDL) += sdlaudio.o
 | 
			
		||||
common-obj-$(CONFIG_OSS) += ossaudio.o
 | 
			
		||||
common-obj-$(CONFIG_SPICE) += spiceaudio.o
 | 
			
		||||
common-obj-$(CONFIG_COREAUDIO) += coreaudio.o
 | 
			
		||||
common-obj-$(CONFIG_ALSA) += alsaaudio.o
 | 
			
		||||
common-obj-$(CONFIG_DSOUND) += dsoundaudio.o
 | 
			
		||||
common-obj-$(CONFIG_FMOD) += fmodaudio.o
 | 
			
		||||
common-obj-$(CONFIG_ESD) += esdaudio.o
 | 
			
		||||
common-obj-$(CONFIG_PA) += paaudio.o
 | 
			
		||||
common-obj-$(CONFIG_WINWAVE) += winwaveaudio.o
 | 
			
		||||
common-obj-$(CONFIG_AUDIO_PT_INT) += audio_pt_int.o
 | 
			
		||||
common-obj-$(CONFIG_AUDIO_WIN_INT) += audio_win_int.o
 | 
			
		||||
common-obj-y += wavcapture.o
 | 
			
		||||
 | 
			
		||||
$(obj)/audio.o $(obj)/fmodaudio.o: QEMU_CFLAGS += $(FMOD_CFLAGS)
 | 
			
		||||
sdlaudio.o-cflags := $(SDL_CFLAGS)
 | 
			
		||||
@@ -23,37 +23,21 @@
 | 
			
		||||
 */
 | 
			
		||||
#include <alsa/asoundlib.h>
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "qemu/main-loop.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
 | 
			
		||||
#if QEMU_GNUC_PREREQ(4, 3)
 | 
			
		||||
#pragma GCC diagnostic ignored "-Waddress"
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "alsa"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
 | 
			
		||||
struct pollhlp {
 | 
			
		||||
    snd_pcm_t *handle;
 | 
			
		||||
    struct pollfd *pfds;
 | 
			
		||||
    int count;
 | 
			
		||||
    int mask;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct ALSAVoiceOut {
 | 
			
		||||
    HWVoiceOut hw;
 | 
			
		||||
    int wpos;
 | 
			
		||||
    int pending;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    snd_pcm_t *handle;
 | 
			
		||||
    struct pollhlp pollhlp;
 | 
			
		||||
} ALSAVoiceOut;
 | 
			
		||||
 | 
			
		||||
typedef struct ALSAVoiceIn {
 | 
			
		||||
    HWVoiceIn hw;
 | 
			
		||||
    snd_pcm_t *handle;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    struct pollhlp pollhlp;
 | 
			
		||||
} ALSAVoiceIn;
 | 
			
		||||
 | 
			
		||||
static struct {
 | 
			
		||||
@@ -74,8 +58,7 @@ static struct {
 | 
			
		||||
    int period_size_out_overridden;
 | 
			
		||||
    int verbose;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .buffer_size_out = 4096,
 | 
			
		||||
    .period_size_out = 1024,
 | 
			
		||||
    .buffer_size_out = 1024,
 | 
			
		||||
    .pcm_name_out = "default",
 | 
			
		||||
    .pcm_name_in = "default",
 | 
			
		||||
};
 | 
			
		||||
@@ -127,23 +110,7 @@ static void GCC_FMT_ATTR (3, 4) alsa_logerr2 (
 | 
			
		||||
    AUD_log (AUDIO_CAP, "Reason: %s\n", snd_strerror (err));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alsa_fini_poll (struct pollhlp *hlp)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
    struct pollfd *pfds = hlp->pfds;
 | 
			
		||||
 | 
			
		||||
    if (pfds) {
 | 
			
		||||
        for (i = 0; i < hlp->count; ++i) {
 | 
			
		||||
            qemu_set_fd_handler (pfds[i].fd, NULL, NULL, NULL);
 | 
			
		||||
        }
 | 
			
		||||
        g_free (pfds);
 | 
			
		||||
    }
 | 
			
		||||
    hlp->pfds = NULL;
 | 
			
		||||
    hlp->count = 0;
 | 
			
		||||
    hlp->handle = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alsa_anal_close1 (snd_pcm_t **handlep)
 | 
			
		||||
static void alsa_anal_close (snd_pcm_t **handlep)
 | 
			
		||||
{
 | 
			
		||||
    int err = snd_pcm_close (*handlep);
 | 
			
		||||
    if (err) {
 | 
			
		||||
@@ -152,173 +119,12 @@ static void alsa_anal_close1 (snd_pcm_t **handlep)
 | 
			
		||||
    *handlep = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alsa_anal_close (snd_pcm_t **handlep, struct pollhlp *hlp)
 | 
			
		||||
{
 | 
			
		||||
    alsa_fini_poll (hlp);
 | 
			
		||||
    alsa_anal_close1 (handlep);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_recover (snd_pcm_t *handle)
 | 
			
		||||
{
 | 
			
		||||
    int err = snd_pcm_prepare (handle);
 | 
			
		||||
    if (err < 0) {
 | 
			
		||||
        alsa_logerr (err, "Failed to prepare handle %p\n", handle);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_resume (snd_pcm_t *handle)
 | 
			
		||||
{
 | 
			
		||||
    int err = snd_pcm_resume (handle);
 | 
			
		||||
    if (err < 0) {
 | 
			
		||||
        alsa_logerr (err, "Failed to resume handle %p\n", handle);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alsa_poll_handler (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    int err, count;
 | 
			
		||||
    snd_pcm_state_t state;
 | 
			
		||||
    struct pollhlp *hlp = opaque;
 | 
			
		||||
    unsigned short revents;
 | 
			
		||||
 | 
			
		||||
    count = poll (hlp->pfds, hlp->count, 0);
 | 
			
		||||
    if (count < 0) {
 | 
			
		||||
        dolog ("alsa_poll_handler: poll %s\n", strerror (errno));
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!count) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* XXX: ALSA example uses initial count, not the one returned by
 | 
			
		||||
       poll, correct? */
 | 
			
		||||
    err = snd_pcm_poll_descriptors_revents (hlp->handle, hlp->pfds,
 | 
			
		||||
                                            hlp->count, &revents);
 | 
			
		||||
    if (err < 0) {
 | 
			
		||||
        alsa_logerr (err, "snd_pcm_poll_descriptors_revents");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!(revents & hlp->mask)) {
 | 
			
		||||
        if (conf.verbose) {
 | 
			
		||||
            dolog ("revents = %d\n", revents);
 | 
			
		||||
        }
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    state = snd_pcm_state (hlp->handle);
 | 
			
		||||
    switch (state) {
 | 
			
		||||
    case SND_PCM_STATE_SETUP:
 | 
			
		||||
        alsa_recover (hlp->handle);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case SND_PCM_STATE_XRUN:
 | 
			
		||||
        alsa_recover (hlp->handle);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case SND_PCM_STATE_SUSPENDED:
 | 
			
		||||
        alsa_resume (hlp->handle);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case SND_PCM_STATE_PREPARED:
 | 
			
		||||
        audio_run ("alsa run (prepared)");
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case SND_PCM_STATE_RUNNING:
 | 
			
		||||
        audio_run ("alsa run (running)");
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Unexpected state %d\n", state);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_poll_helper (snd_pcm_t *handle, struct pollhlp *hlp, int mask)
 | 
			
		||||
{
 | 
			
		||||
    int i, count, err;
 | 
			
		||||
    struct pollfd *pfds;
 | 
			
		||||
 | 
			
		||||
    count = snd_pcm_poll_descriptors_count (handle);
 | 
			
		||||
    if (count <= 0) {
 | 
			
		||||
        dolog ("Could not initialize poll mode\n"
 | 
			
		||||
               "Invalid number of poll descriptors %d\n", count);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pfds = audio_calloc ("alsa_poll_helper", count, sizeof (*pfds));
 | 
			
		||||
    if (!pfds) {
 | 
			
		||||
        dolog ("Could not initialize poll mode\n");
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = snd_pcm_poll_descriptors (handle, pfds, count);
 | 
			
		||||
    if (err < 0) {
 | 
			
		||||
        alsa_logerr (err, "Could not initialize poll mode\n"
 | 
			
		||||
                     "Could not obtain poll descriptors\n");
 | 
			
		||||
        g_free (pfds);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < count; ++i) {
 | 
			
		||||
        if (pfds[i].events & POLLIN) {
 | 
			
		||||
            err = qemu_set_fd_handler (pfds[i].fd, alsa_poll_handler,
 | 
			
		||||
                                       NULL, hlp);
 | 
			
		||||
        }
 | 
			
		||||
        if (pfds[i].events & POLLOUT) {
 | 
			
		||||
            if (conf.verbose) {
 | 
			
		||||
                dolog ("POLLOUT %d %d\n", i, pfds[i].fd);
 | 
			
		||||
            }
 | 
			
		||||
            err = qemu_set_fd_handler (pfds[i].fd, NULL,
 | 
			
		||||
                                       alsa_poll_handler, hlp);
 | 
			
		||||
        }
 | 
			
		||||
        if (conf.verbose) {
 | 
			
		||||
            dolog ("Set handler events=%#x index=%d fd=%d err=%d\n",
 | 
			
		||||
                   pfds[i].events, i, pfds[i].fd, err);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (err) {
 | 
			
		||||
            dolog ("Failed to set handler events=%#x index=%d fd=%d err=%d\n",
 | 
			
		||||
                   pfds[i].events, i, pfds[i].fd, err);
 | 
			
		||||
 | 
			
		||||
            while (i--) {
 | 
			
		||||
                qemu_set_fd_handler (pfds[i].fd, NULL, NULL, NULL);
 | 
			
		||||
            }
 | 
			
		||||
            g_free (pfds);
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    hlp->pfds = pfds;
 | 
			
		||||
    hlp->count = count;
 | 
			
		||||
    hlp->handle = handle;
 | 
			
		||||
    hlp->mask = mask;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_poll_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    return alsa_poll_helper (alsa->handle, &alsa->pollhlp, POLLOUT);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_poll_in (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    return alsa_poll_helper (alsa->handle, &alsa->pollhlp, POLLIN);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_write (SWVoiceOut *sw, void *buf, int len)
 | 
			
		||||
{
 | 
			
		||||
    return audio_pcm_sw_write (sw, buf, len);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static snd_pcm_format_t aud_to_alsafmt (audfmt_e fmt, int endianness)
 | 
			
		||||
static snd_pcm_format_t aud_to_alsafmt (audfmt_e fmt)
 | 
			
		||||
{
 | 
			
		||||
    switch (fmt) {
 | 
			
		||||
    case AUD_FMT_S8:
 | 
			
		||||
@@ -328,36 +134,16 @@ static snd_pcm_format_t aud_to_alsafmt (audfmt_e fmt, int endianness)
 | 
			
		||||
        return SND_PCM_FORMAT_U8;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S16:
 | 
			
		||||
        if (endianness) {
 | 
			
		||||
            return SND_PCM_FORMAT_S16_BE;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            return SND_PCM_FORMAT_S16_LE;
 | 
			
		||||
        }
 | 
			
		||||
        return SND_PCM_FORMAT_S16_LE;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_U16:
 | 
			
		||||
        if (endianness) {
 | 
			
		||||
            return SND_PCM_FORMAT_U16_BE;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            return SND_PCM_FORMAT_U16_LE;
 | 
			
		||||
        }
 | 
			
		||||
        return SND_PCM_FORMAT_U16_LE;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S32:
 | 
			
		||||
        if (endianness) {
 | 
			
		||||
            return SND_PCM_FORMAT_S32_BE;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            return SND_PCM_FORMAT_S32_LE;
 | 
			
		||||
        }
 | 
			
		||||
        return SND_PCM_FORMAT_S32_LE;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_U32:
 | 
			
		||||
        if (endianness) {
 | 
			
		||||
            return SND_PCM_FORMAT_U32_BE;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            return SND_PCM_FORMAT_U32_LE;
 | 
			
		||||
        }
 | 
			
		||||
        return SND_PCM_FORMAT_U32_LE;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Internal logic error: Bad audio format %d\n", fmt);
 | 
			
		||||
@@ -431,11 +217,10 @@ static int alsa_to_audfmt (snd_pcm_format_t alsafmt, audfmt_e *fmt,
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alsa_dump_info (struct alsa_params_req *req,
 | 
			
		||||
                            struct alsa_params_obt *obt,
 | 
			
		||||
                            snd_pcm_format_t obtfmt)
 | 
			
		||||
                            struct alsa_params_obt *obt)
 | 
			
		||||
{
 | 
			
		||||
    dolog ("parameter | requested value | obtained value\n");
 | 
			
		||||
    dolog ("format    |      %10d |     %10d\n", req->fmt, obtfmt);
 | 
			
		||||
    dolog ("format    |      %10d |     %10d\n", req->fmt, obt->fmt);
 | 
			
		||||
    dolog ("channels  |      %10d |     %10d\n",
 | 
			
		||||
           req->nchannels, obt->nchannels);
 | 
			
		||||
    dolog ("frequency |      %10d |     %10d\n", req->freq, obt->freq);
 | 
			
		||||
@@ -620,7 +405,7 @@ static int alsa_open (int in, struct alsa_params_req *req,
 | 
			
		||||
            goto err;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (((req->override_mask & 1) && (obt - req->period_size)))
 | 
			
		||||
        if ((req->override_mask & 1) && (obt - req->period_size))
 | 
			
		||||
            dolog ("Requested period %s %u was rejected, using %lu\n",
 | 
			
		||||
                   size_in_usec ? "time" : "size", req->period_size, obt);
 | 
			
		||||
    }
 | 
			
		||||
@@ -687,23 +472,33 @@ static int alsa_open (int in, struct alsa_params_req *req,
 | 
			
		||||
    *handlep = handle;
 | 
			
		||||
 | 
			
		||||
    if (conf.verbose &&
 | 
			
		||||
        (obtfmt != req->fmt ||
 | 
			
		||||
        (obt->fmt != req->fmt ||
 | 
			
		||||
         obt->nchannels != req->nchannels ||
 | 
			
		||||
         obt->freq != req->freq)) {
 | 
			
		||||
        dolog ("Audio parameters for %s\n", typ);
 | 
			
		||||
        alsa_dump_info (req, obt, obtfmt);
 | 
			
		||||
        dolog ("Audio paramters for %s\n", typ);
 | 
			
		||||
        alsa_dump_info (req, obt);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG
 | 
			
		||||
    alsa_dump_info (req, obt, obtfmt);
 | 
			
		||||
    alsa_dump_info (req, obt);
 | 
			
		||||
#endif
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 err:
 | 
			
		||||
    alsa_anal_close1 (&handle);
 | 
			
		||||
    alsa_anal_close (&handle);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_recover (snd_pcm_t *handle)
 | 
			
		||||
{
 | 
			
		||||
    int err = snd_pcm_prepare (handle);
 | 
			
		||||
    if (err < 0) {
 | 
			
		||||
        alsa_logerr (err, "Failed to prepare handle %p\n", handle);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static snd_pcm_sframes_t alsa_get_avail (snd_pcm_t *handle)
 | 
			
		||||
{
 | 
			
		||||
    snd_pcm_sframes_t avail;
 | 
			
		||||
@@ -726,75 +521,20 @@ static snd_pcm_sframes_t alsa_get_avail (snd_pcm_t *handle)
 | 
			
		||||
    return avail;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alsa_write_pending (ALSAVoiceOut *alsa)
 | 
			
		||||
{
 | 
			
		||||
    HWVoiceOut *hw = &alsa->hw;
 | 
			
		||||
 | 
			
		||||
    while (alsa->pending) {
 | 
			
		||||
        int left_till_end_samples = hw->samples - alsa->wpos;
 | 
			
		||||
        int len = audio_MIN (alsa->pending, left_till_end_samples);
 | 
			
		||||
        char *src = advance (alsa->pcm_buf, alsa->wpos << hw->info.shift);
 | 
			
		||||
 | 
			
		||||
        while (len) {
 | 
			
		||||
            snd_pcm_sframes_t written;
 | 
			
		||||
 | 
			
		||||
            written = snd_pcm_writei (alsa->handle, src, len);
 | 
			
		||||
 | 
			
		||||
            if (written <= 0) {
 | 
			
		||||
                switch (written) {
 | 
			
		||||
                case 0:
 | 
			
		||||
                    if (conf.verbose) {
 | 
			
		||||
                        dolog ("Failed to write %d frames (wrote zero)\n", len);
 | 
			
		||||
                    }
 | 
			
		||||
                    return;
 | 
			
		||||
 | 
			
		||||
                case -EPIPE:
 | 
			
		||||
                    if (alsa_recover (alsa->handle)) {
 | 
			
		||||
                        alsa_logerr (written, "Failed to write %d frames\n",
 | 
			
		||||
                                     len);
 | 
			
		||||
                        return;
 | 
			
		||||
                    }
 | 
			
		||||
                    if (conf.verbose) {
 | 
			
		||||
                        dolog ("Recovering from playback xrun\n");
 | 
			
		||||
                    }
 | 
			
		||||
                    continue;
 | 
			
		||||
 | 
			
		||||
                case -ESTRPIPE:
 | 
			
		||||
                    /* stream is suspended and waiting for an
 | 
			
		||||
                       application recovery */
 | 
			
		||||
                    if (alsa_resume (alsa->handle)) {
 | 
			
		||||
                        alsa_logerr (written, "Failed to write %d frames\n",
 | 
			
		||||
                                     len);
 | 
			
		||||
                        return;
 | 
			
		||||
                    }
 | 
			
		||||
                    if (conf.verbose) {
 | 
			
		||||
                        dolog ("Resuming suspended output stream\n");
 | 
			
		||||
                    }
 | 
			
		||||
                    continue;
 | 
			
		||||
 | 
			
		||||
                case -EAGAIN:
 | 
			
		||||
                    return;
 | 
			
		||||
 | 
			
		||||
                default:
 | 
			
		||||
                    alsa_logerr (written, "Failed to write %d frames from %p\n",
 | 
			
		||||
                                 len, src);
 | 
			
		||||
                    return;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            alsa->wpos = (alsa->wpos + written) % hw->samples;
 | 
			
		||||
            alsa->pending -= written;
 | 
			
		||||
            len -= written;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int alsa_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
 | 
			
		||||
    int decr;
 | 
			
		||||
    int rpos, live, decr;
 | 
			
		||||
    int samples;
 | 
			
		||||
    uint8_t *dst;
 | 
			
		||||
    struct st_sample *src;
 | 
			
		||||
    snd_pcm_sframes_t avail;
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
    if (!live) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    avail = alsa_get_avail (alsa->handle);
 | 
			
		||||
    if (avail < 0) {
 | 
			
		||||
        dolog ("Could not get number of available playback frames\n");
 | 
			
		||||
@@ -802,9 +542,60 @@ static int alsa_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    decr = audio_MIN (live, avail);
 | 
			
		||||
    decr = audio_pcm_hw_clip_out (hw, alsa->pcm_buf, decr, alsa->pending);
 | 
			
		||||
    alsa->pending += decr;
 | 
			
		||||
    alsa_write_pending (alsa);
 | 
			
		||||
    samples = decr;
 | 
			
		||||
    rpos = hw->rpos;
 | 
			
		||||
    while (samples) {
 | 
			
		||||
        int left_till_end_samples = hw->samples - rpos;
 | 
			
		||||
        int len = audio_MIN (samples, left_till_end_samples);
 | 
			
		||||
        snd_pcm_sframes_t written;
 | 
			
		||||
 | 
			
		||||
        src = hw->mix_buf + rpos;
 | 
			
		||||
        dst = advance (alsa->pcm_buf, rpos << hw->info.shift);
 | 
			
		||||
 | 
			
		||||
        hw->clip (dst, src, len);
 | 
			
		||||
 | 
			
		||||
        while (len) {
 | 
			
		||||
            written = snd_pcm_writei (alsa->handle, dst, len);
 | 
			
		||||
 | 
			
		||||
            if (written <= 0) {
 | 
			
		||||
                switch (written) {
 | 
			
		||||
                case 0:
 | 
			
		||||
                    if (conf.verbose) {
 | 
			
		||||
                        dolog ("Failed to write %d frames (wrote zero)\n", len);
 | 
			
		||||
                    }
 | 
			
		||||
                    goto exit;
 | 
			
		||||
 | 
			
		||||
                case -EPIPE:
 | 
			
		||||
                    if (alsa_recover (alsa->handle)) {
 | 
			
		||||
                        alsa_logerr (written, "Failed to write %d frames\n",
 | 
			
		||||
                                     len);
 | 
			
		||||
                        goto exit;
 | 
			
		||||
                    }
 | 
			
		||||
                    if (conf.verbose) {
 | 
			
		||||
                        dolog ("Recovering from playback xrun\n");
 | 
			
		||||
                    }
 | 
			
		||||
                    continue;
 | 
			
		||||
 | 
			
		||||
                case -EAGAIN:
 | 
			
		||||
                    goto exit;
 | 
			
		||||
 | 
			
		||||
                default:
 | 
			
		||||
                    alsa_logerr (written, "Failed to write %d frames to %p\n",
 | 
			
		||||
                                 len, dst);
 | 
			
		||||
                    goto exit;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            rpos = (rpos + written) % hw->samples;
 | 
			
		||||
            samples -= written;
 | 
			
		||||
            len -= written;
 | 
			
		||||
            dst = advance (dst, written << hw->info.shift);
 | 
			
		||||
            src += written;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 exit:
 | 
			
		||||
    hw->rpos = rpos;
 | 
			
		||||
    return decr;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -813,10 +604,12 @@ static void alsa_fini_out (HWVoiceOut *hw)
 | 
			
		||||
    ALSAVoiceOut *alsa = (ALSAVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    ldebug ("alsa_fini\n");
 | 
			
		||||
    alsa_anal_close (&alsa->handle, &alsa->pollhlp);
 | 
			
		||||
    alsa_anal_close (&alsa->handle);
 | 
			
		||||
 | 
			
		||||
    g_free(alsa->pcm_buf);
 | 
			
		||||
    alsa->pcm_buf = NULL;
 | 
			
		||||
    if (alsa->pcm_buf) {
 | 
			
		||||
        qemu_free (alsa->pcm_buf);
 | 
			
		||||
        alsa->pcm_buf = NULL;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
@@ -827,15 +620,14 @@ static int alsa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    snd_pcm_t *handle;
 | 
			
		||||
    struct audsettings obt_as;
 | 
			
		||||
 | 
			
		||||
    req.fmt = aud_to_alsafmt (as->fmt, as->endianness);
 | 
			
		||||
    req.fmt = aud_to_alsafmt (as->fmt);
 | 
			
		||||
    req.freq = as->freq;
 | 
			
		||||
    req.nchannels = as->nchannels;
 | 
			
		||||
    req.period_size = conf.period_size_out;
 | 
			
		||||
    req.buffer_size = conf.buffer_size_out;
 | 
			
		||||
    req.size_in_usec = conf.size_in_usec_out;
 | 
			
		||||
    req.override_mask =
 | 
			
		||||
        (conf.period_size_out_overridden ? 1 : 0) |
 | 
			
		||||
        (conf.buffer_size_out_overridden ? 2 : 0);
 | 
			
		||||
    req.override_mask = !!conf.period_size_out_overridden
 | 
			
		||||
        | (!!conf.buffer_size_out_overridden << 1);
 | 
			
		||||
 | 
			
		||||
    if (alsa_open (0, &req, &obt, &handle)) {
 | 
			
		||||
        return -1;
 | 
			
		||||
@@ -853,7 +645,7 @@ static int alsa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    if (!alsa->pcm_buf) {
 | 
			
		||||
        dolog ("Could not allocate DAC buffer (%d samples, each %d bytes)\n",
 | 
			
		||||
               hw->samples, 1 << hw->info.shift);
 | 
			
		||||
        alsa_anal_close1 (&handle);
 | 
			
		||||
        alsa_anal_close (&handle);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
@@ -861,15 +653,11 @@ static int alsa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#define VOICE_CTL_PAUSE 0
 | 
			
		||||
#define VOICE_CTL_PREPARE 1
 | 
			
		||||
#define VOICE_CTL_START 2
 | 
			
		||||
 | 
			
		||||
static int alsa_voice_ctl (snd_pcm_t *handle, const char *typ, int ctl)
 | 
			
		||||
static int alsa_voice_ctl (snd_pcm_t *handle, const char *typ, int pause)
 | 
			
		||||
{
 | 
			
		||||
    int err;
 | 
			
		||||
 | 
			
		||||
    if (ctl == VOICE_CTL_PAUSE) {
 | 
			
		||||
    if (pause) {
 | 
			
		||||
        err = snd_pcm_drop (handle);
 | 
			
		||||
        if (err < 0) {
 | 
			
		||||
            alsa_logerr (err, "Could not stop %s\n", typ);
 | 
			
		||||
@@ -882,13 +670,6 @@ static int alsa_voice_ctl (snd_pcm_t *handle, const char *typ, int ctl)
 | 
			
		||||
            alsa_logerr (err, "Could not prepare handle for %s\n", typ);
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        if (ctl == VOICE_CTL_START) {
 | 
			
		||||
            err = snd_pcm_start(handle);
 | 
			
		||||
            if (err < 0) {
 | 
			
		||||
                alsa_logerr (err, "Could not start handle for %s\n", typ);
 | 
			
		||||
                return -1;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
@@ -900,29 +681,12 @@ static int alsa_ctl_out (HWVoiceOut *hw, int cmd, ...)
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        {
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            int poll_mode;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            poll_mode = va_arg (ap, int);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            ldebug ("enabling voice\n");
 | 
			
		||||
            if (poll_mode && alsa_poll_out (hw)) {
 | 
			
		||||
                poll_mode = 0;
 | 
			
		||||
            }
 | 
			
		||||
            hw->poll_mode = poll_mode;
 | 
			
		||||
            return alsa_voice_ctl (alsa->handle, "playback", VOICE_CTL_PREPARE);
 | 
			
		||||
        }
 | 
			
		||||
        ldebug ("enabling voice\n");
 | 
			
		||||
        return alsa_voice_ctl (alsa->handle, "playback", 0);
 | 
			
		||||
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        ldebug ("disabling voice\n");
 | 
			
		||||
        if (hw->poll_mode) {
 | 
			
		||||
            hw->poll_mode = 0;
 | 
			
		||||
            alsa_fini_poll (&alsa->pollhlp);
 | 
			
		||||
        }
 | 
			
		||||
        return alsa_voice_ctl (alsa->handle, "playback", VOICE_CTL_PAUSE);
 | 
			
		||||
        return alsa_voice_ctl (alsa->handle, "playback", 1);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return -1;
 | 
			
		||||
@@ -936,15 +700,14 @@ static int alsa_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
    snd_pcm_t *handle;
 | 
			
		||||
    struct audsettings obt_as;
 | 
			
		||||
 | 
			
		||||
    req.fmt = aud_to_alsafmt (as->fmt, as->endianness);
 | 
			
		||||
    req.fmt = aud_to_alsafmt (as->fmt);
 | 
			
		||||
    req.freq = as->freq;
 | 
			
		||||
    req.nchannels = as->nchannels;
 | 
			
		||||
    req.period_size = conf.period_size_in;
 | 
			
		||||
    req.buffer_size = conf.buffer_size_in;
 | 
			
		||||
    req.size_in_usec = conf.size_in_usec_in;
 | 
			
		||||
    req.override_mask =
 | 
			
		||||
        (conf.period_size_in_overridden ? 1 : 0) |
 | 
			
		||||
        (conf.buffer_size_in_overridden ? 2 : 0);
 | 
			
		||||
    req.override_mask = !!conf.period_size_in_overridden
 | 
			
		||||
        | (!!conf.buffer_size_in_overridden << 1);
 | 
			
		||||
 | 
			
		||||
    if (alsa_open (1, &req, &obt, &handle)) {
 | 
			
		||||
        return -1;
 | 
			
		||||
@@ -962,7 +725,7 @@ static int alsa_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
    if (!alsa->pcm_buf) {
 | 
			
		||||
        dolog ("Could not allocate ADC buffer (%d samples, each %d bytes)\n",
 | 
			
		||||
               hw->samples, 1 << hw->info.shift);
 | 
			
		||||
        alsa_anal_close1 (&handle);
 | 
			
		||||
        alsa_anal_close (&handle);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
@@ -974,10 +737,12 @@ static void alsa_fini_in (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    ALSAVoiceIn *alsa = (ALSAVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    alsa_anal_close (&alsa->handle, &alsa->pollhlp);
 | 
			
		||||
    alsa_anal_close (&alsa->handle);
 | 
			
		||||
 | 
			
		||||
    g_free(alsa->pcm_buf);
 | 
			
		||||
    alsa->pcm_buf = NULL;
 | 
			
		||||
    if (alsa->pcm_buf) {
 | 
			
		||||
        qemu_free (alsa->pcm_buf);
 | 
			
		||||
        alsa->pcm_buf = NULL;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int alsa_run_in (HWVoiceIn *hw)
 | 
			
		||||
@@ -992,8 +757,8 @@ static int alsa_run_in (HWVoiceIn *hw)
 | 
			
		||||
        int add;
 | 
			
		||||
        int len;
 | 
			
		||||
    } bufs[2] = {
 | 
			
		||||
        { .add = hw->wpos, .len = 0 },
 | 
			
		||||
        { .add = 0,        .len = 0 }
 | 
			
		||||
        { hw->wpos, 0 },
 | 
			
		||||
        { 0, 0 }
 | 
			
		||||
    };
 | 
			
		||||
    snd_pcm_sframes_t avail;
 | 
			
		||||
    snd_pcm_uframes_t read_samples = 0;
 | 
			
		||||
@@ -1008,30 +773,8 @@ static int alsa_run_in (HWVoiceIn *hw)
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!avail) {
 | 
			
		||||
        snd_pcm_state_t state;
 | 
			
		||||
 | 
			
		||||
        state = snd_pcm_state (alsa->handle);
 | 
			
		||||
        switch (state) {
 | 
			
		||||
        case SND_PCM_STATE_PREPARED:
 | 
			
		||||
            avail = hw->samples;
 | 
			
		||||
            break;
 | 
			
		||||
        case SND_PCM_STATE_SUSPENDED:
 | 
			
		||||
            /* stream is suspended and waiting for an application recovery */
 | 
			
		||||
            if (alsa_resume (alsa->handle)) {
 | 
			
		||||
                dolog ("Failed to resume suspended input stream\n");
 | 
			
		||||
                return 0;
 | 
			
		||||
            }
 | 
			
		||||
            if (conf.verbose) {
 | 
			
		||||
                dolog ("Resuming suspended input stream\n");
 | 
			
		||||
            }
 | 
			
		||||
            break;
 | 
			
		||||
        default:
 | 
			
		||||
            if (conf.verbose) {
 | 
			
		||||
                dolog ("No frames available and ALSA state is %d\n", state);
 | 
			
		||||
            }
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
    if (!avail && (snd_pcm_state (alsa->handle) == SND_PCM_STATE_PREPARED)) {
 | 
			
		||||
        avail = hw->samples;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    decr = audio_MIN (dead, avail);
 | 
			
		||||
@@ -1093,7 +836,7 @@ static int alsa_run_in (HWVoiceIn *hw)
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            hw->conv (dst, src, nread);
 | 
			
		||||
            hw->conv (dst, src, nread, &nominal_volume);
 | 
			
		||||
 | 
			
		||||
            src = advance (src, nread << hwshift);
 | 
			
		||||
            dst += nread;
 | 
			
		||||
@@ -1119,30 +862,12 @@ static int alsa_ctl_in (HWVoiceIn *hw, int cmd, ...)
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        {
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            int poll_mode;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            poll_mode = va_arg (ap, int);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            ldebug ("enabling voice\n");
 | 
			
		||||
            if (poll_mode && alsa_poll_in (hw)) {
 | 
			
		||||
                poll_mode = 0;
 | 
			
		||||
            }
 | 
			
		||||
            hw->poll_mode = poll_mode;
 | 
			
		||||
 | 
			
		||||
            return alsa_voice_ctl (alsa->handle, "capture", VOICE_CTL_START);
 | 
			
		||||
        }
 | 
			
		||||
        ldebug ("enabling voice\n");
 | 
			
		||||
        return alsa_voice_ctl (alsa->handle, "capture", 0);
 | 
			
		||||
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        ldebug ("disabling voice\n");
 | 
			
		||||
        if (hw->poll_mode) {
 | 
			
		||||
            hw->poll_mode = 0;
 | 
			
		||||
            alsa_fini_poll (&alsa->pollhlp);
 | 
			
		||||
        }
 | 
			
		||||
        return alsa_voice_ctl (alsa->handle, "capture", VOICE_CTL_PAUSE);
 | 
			
		||||
        return alsa_voice_ctl (alsa->handle, "capture", 1);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return -1;
 | 
			
		||||
@@ -1159,98 +884,63 @@ static void alsa_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option alsa_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "DAC_SIZE_IN_USEC",
 | 
			
		||||
        .tag         = AUD_OPT_BOOL,
 | 
			
		||||
        .valp        = &conf.size_in_usec_out,
 | 
			
		||||
        .descr       = "DAC period/buffer size in microseconds (otherwise in frames)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "DAC_PERIOD_SIZE",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.period_size_out,
 | 
			
		||||
        .descr       = "DAC period size (0 to go with system default)",
 | 
			
		||||
        .overriddenp = &conf.period_size_out_overridden
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "DAC_BUFFER_SIZE",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.buffer_size_out,
 | 
			
		||||
        .descr       = "DAC buffer size (0 to go with system default)",
 | 
			
		||||
        .overriddenp = &conf.buffer_size_out_overridden
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "ADC_SIZE_IN_USEC",
 | 
			
		||||
        .tag         = AUD_OPT_BOOL,
 | 
			
		||||
        .valp        = &conf.size_in_usec_in,
 | 
			
		||||
        .descr       =
 | 
			
		||||
        "ADC period/buffer size in microseconds (otherwise in frames)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "ADC_PERIOD_SIZE",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.period_size_in,
 | 
			
		||||
        .descr       = "ADC period size (0 to go with system default)",
 | 
			
		||||
        .overriddenp = &conf.period_size_in_overridden
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "ADC_BUFFER_SIZE",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.buffer_size_in,
 | 
			
		||||
        .descr       = "ADC buffer size (0 to go with system default)",
 | 
			
		||||
        .overriddenp = &conf.buffer_size_in_overridden
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "THRESHOLD",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.threshold,
 | 
			
		||||
        .descr       = "(undocumented)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "DAC_DEV",
 | 
			
		||||
        .tag         = AUD_OPT_STR,
 | 
			
		||||
        .valp        = &conf.pcm_name_out,
 | 
			
		||||
        .descr       = "DAC device name (for instance dmix)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "ADC_DEV",
 | 
			
		||||
        .tag         = AUD_OPT_STR,
 | 
			
		||||
        .valp        = &conf.pcm_name_in,
 | 
			
		||||
        .descr       = "ADC device name"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "VERBOSE",
 | 
			
		||||
        .tag         = AUD_OPT_BOOL,
 | 
			
		||||
        .valp        = &conf.verbose,
 | 
			
		||||
        .descr       = "Behave in a more verbose way"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"DAC_SIZE_IN_USEC", AUD_OPT_BOOL, &conf.size_in_usec_out,
 | 
			
		||||
     "DAC period/buffer size in microseconds (otherwise in frames)", NULL, 0},
 | 
			
		||||
    {"DAC_PERIOD_SIZE", AUD_OPT_INT, &conf.period_size_out,
 | 
			
		||||
     "DAC period size (0 to go with system default)",
 | 
			
		||||
     &conf.period_size_out_overridden, 0},
 | 
			
		||||
    {"DAC_BUFFER_SIZE", AUD_OPT_INT, &conf.buffer_size_out,
 | 
			
		||||
     "DAC buffer size (0 to go with system default)",
 | 
			
		||||
     &conf.buffer_size_out_overridden, 0},
 | 
			
		||||
 | 
			
		||||
    {"ADC_SIZE_IN_USEC", AUD_OPT_BOOL, &conf.size_in_usec_in,
 | 
			
		||||
     "ADC period/buffer size in microseconds (otherwise in frames)", NULL, 0},
 | 
			
		||||
    {"ADC_PERIOD_SIZE", AUD_OPT_INT, &conf.period_size_in,
 | 
			
		||||
     "ADC period size (0 to go with system default)",
 | 
			
		||||
     &conf.period_size_in_overridden, 0},
 | 
			
		||||
    {"ADC_BUFFER_SIZE", AUD_OPT_INT, &conf.buffer_size_in,
 | 
			
		||||
     "ADC buffer size (0 to go with system default)",
 | 
			
		||||
     &conf.buffer_size_in_overridden, 0},
 | 
			
		||||
 | 
			
		||||
    {"THRESHOLD", AUD_OPT_INT, &conf.threshold,
 | 
			
		||||
     "(undocumented)", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"DAC_DEV", AUD_OPT_STR, &conf.pcm_name_out,
 | 
			
		||||
     "DAC device name (for instance dmix)", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"ADC_DEV", AUD_OPT_STR, &conf.pcm_name_in,
 | 
			
		||||
     "ADC device name", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"VERBOSE", AUD_OPT_BOOL, &conf.verbose,
 | 
			
		||||
     "Behave in a more verbose way", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops alsa_pcm_ops = {
 | 
			
		||||
    .init_out = alsa_init_out,
 | 
			
		||||
    .fini_out = alsa_fini_out,
 | 
			
		||||
    .run_out  = alsa_run_out,
 | 
			
		||||
    .write    = alsa_write,
 | 
			
		||||
    .ctl_out  = alsa_ctl_out,
 | 
			
		||||
    alsa_init_out,
 | 
			
		||||
    alsa_fini_out,
 | 
			
		||||
    alsa_run_out,
 | 
			
		||||
    alsa_write,
 | 
			
		||||
    alsa_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = alsa_init_in,
 | 
			
		||||
    .fini_in  = alsa_fini_in,
 | 
			
		||||
    .run_in   = alsa_run_in,
 | 
			
		||||
    .read     = alsa_read,
 | 
			
		||||
    .ctl_in   = alsa_ctl_in,
 | 
			
		||||
    alsa_init_in,
 | 
			
		||||
    alsa_fini_in,
 | 
			
		||||
    alsa_run_in,
 | 
			
		||||
    alsa_read,
 | 
			
		||||
    alsa_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver alsa_audio_driver = {
 | 
			
		||||
    .name           = "alsa",
 | 
			
		||||
    .descr          = "ALSA http://www.alsa-project.org",
 | 
			
		||||
    .options        = alsa_options,
 | 
			
		||||
    .init           = alsa_audio_init,
 | 
			
		||||
    .fini           = alsa_audio_fini,
 | 
			
		||||
    .pcm_ops        = &alsa_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (ALSAVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (ALSAVoiceIn)
 | 
			
		||||
    INIT_FIELD (name           = ) "alsa",
 | 
			
		||||
    INIT_FIELD (descr          = ) "ALSA http://www.alsa-project.org",
 | 
			
		||||
    INIT_FIELD (options        = ) alsa_options,
 | 
			
		||||
    INIT_FIELD (init           = ) alsa_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) alsa_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &alsa_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (ALSAVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (ALSAVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										615
									
								
								audio/audio.c
									
									
									
									
									
								
							
							
						
						
									
										615
									
								
								audio/audio.c
									
									
									
									
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							@@ -25,9 +25,9 @@
 | 
			
		||||
#define QEMU_AUDIO_H
 | 
			
		||||
 | 
			
		||||
#include "config-host.h"
 | 
			
		||||
#include "qemu/queue.h"
 | 
			
		||||
#include "sys-queue.h"
 | 
			
		||||
 | 
			
		||||
typedef void (*audio_callback_fn) (void *opaque, int avail);
 | 
			
		||||
typedef void (*audio_callback_fn_t) (void *opaque, int avail);
 | 
			
		||||
 | 
			
		||||
typedef enum {
 | 
			
		||||
    AUD_FMT_U8,
 | 
			
		||||
@@ -38,7 +38,7 @@ typedef enum {
 | 
			
		||||
    AUD_FMT_S32
 | 
			
		||||
} audfmt_e;
 | 
			
		||||
 | 
			
		||||
#ifdef HOST_WORDS_BIGENDIAN
 | 
			
		||||
#ifdef WORDS_BIGENDIAN
 | 
			
		||||
#define AUDIO_HOST_ENDIANNESS 1
 | 
			
		||||
#else
 | 
			
		||||
#define AUDIO_HOST_ENDIANNESS 0
 | 
			
		||||
@@ -70,7 +70,7 @@ struct capture_ops {
 | 
			
		||||
typedef struct CaptureState {
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    struct capture_ops ops;
 | 
			
		||||
    QLIST_ENTRY (CaptureState) entries;
 | 
			
		||||
    LIST_ENTRY (CaptureState) entries;
 | 
			
		||||
} CaptureState;
 | 
			
		||||
 | 
			
		||||
typedef struct SWVoiceOut SWVoiceOut;
 | 
			
		||||
@@ -78,21 +78,28 @@ typedef struct CaptureVoiceOut CaptureVoiceOut;
 | 
			
		||||
typedef struct SWVoiceIn SWVoiceIn;
 | 
			
		||||
 | 
			
		||||
typedef struct QEMUSoundCard {
 | 
			
		||||
    AudioState *audio;
 | 
			
		||||
    char *name;
 | 
			
		||||
    QLIST_ENTRY (QEMUSoundCard) entries;
 | 
			
		||||
    LIST_ENTRY (QEMUSoundCard) entries;
 | 
			
		||||
} QEMUSoundCard;
 | 
			
		||||
 | 
			
		||||
typedef struct QEMUAudioTimeStamp {
 | 
			
		||||
    uint64_t old_ts;
 | 
			
		||||
} QEMUAudioTimeStamp;
 | 
			
		||||
 | 
			
		||||
void AUD_vlog (const char *cap, const char *fmt, va_list ap) GCC_FMT_ATTR(2, 0);
 | 
			
		||||
void AUD_log (const char *cap, const char *fmt, ...) GCC_FMT_ATTR(2, 3);
 | 
			
		||||
void AUD_vlog (const char *cap, const char *fmt, va_list ap);
 | 
			
		||||
void AUD_log (const char *cap, const char *fmt, ...)
 | 
			
		||||
#ifdef __GNUC__
 | 
			
		||||
    __attribute__ ((__format__ (__printf__, 2, 3)))
 | 
			
		||||
#endif
 | 
			
		||||
    ;
 | 
			
		||||
 | 
			
		||||
AudioState *AUD_init (void);
 | 
			
		||||
void AUD_help (void);
 | 
			
		||||
void AUD_register_card (const char *name, QEMUSoundCard *card);
 | 
			
		||||
void AUD_register_card (AudioState *s, const char *name, QEMUSoundCard *card);
 | 
			
		||||
void AUD_remove_card (QEMUSoundCard *card);
 | 
			
		||||
CaptureVoiceOut *AUD_add_capture (
 | 
			
		||||
    AudioState *s,
 | 
			
		||||
    struct audsettings *as,
 | 
			
		||||
    struct audio_capture_ops *ops,
 | 
			
		||||
    void *opaque
 | 
			
		||||
@@ -104,7 +111,7 @@ SWVoiceOut *AUD_open_out (
 | 
			
		||||
    SWVoiceOut *sw,
 | 
			
		||||
    const char *name,
 | 
			
		||||
    void *callback_opaque,
 | 
			
		||||
    audio_callback_fn callback_fn,
 | 
			
		||||
    audio_callback_fn_t callback_fn,
 | 
			
		||||
    struct audsettings *settings
 | 
			
		||||
    );
 | 
			
		||||
 | 
			
		||||
@@ -125,7 +132,7 @@ SWVoiceIn *AUD_open_in (
 | 
			
		||||
    SWVoiceIn *sw,
 | 
			
		||||
    const char *name,
 | 
			
		||||
    void *callback_opaque,
 | 
			
		||||
    audio_callback_fn callback_fn,
 | 
			
		||||
    audio_callback_fn_t callback_fn,
 | 
			
		||||
    struct audsettings *settings
 | 
			
		||||
    );
 | 
			
		||||
 | 
			
		||||
@@ -143,6 +150,9 @@ static inline void *advance (void *p, int incr)
 | 
			
		||||
    return (d + incr);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
uint32_t popcount (uint32_t u);
 | 
			
		||||
uint32_t lsbindex (uint32_t u);
 | 
			
		||||
 | 
			
		||||
#ifdef __GNUC__
 | 
			
		||||
#define audio_MIN(a, b) ( __extension__ ({      \
 | 
			
		||||
    __typeof (a) ta = a;                        \
 | 
			
		||||
 
 | 
			
		||||
@@ -50,7 +50,7 @@ struct audio_option {
 | 
			
		||||
 | 
			
		||||
struct audio_callback {
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    audio_callback_fn fn;
 | 
			
		||||
    audio_callback_fn_t fn;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_pcm_info {
 | 
			
		||||
@@ -68,7 +68,6 @@ typedef struct SWVoiceCap SWVoiceCap;
 | 
			
		||||
 | 
			
		||||
typedef struct HWVoiceOut {
 | 
			
		||||
    int enabled;
 | 
			
		||||
    int poll_mode;
 | 
			
		||||
    int pending_disable;
 | 
			
		||||
    struct audio_pcm_info info;
 | 
			
		||||
 | 
			
		||||
@@ -80,16 +79,14 @@ typedef struct HWVoiceOut {
 | 
			
		||||
    struct st_sample *mix_buf;
 | 
			
		||||
 | 
			
		||||
    int samples;
 | 
			
		||||
    QLIST_HEAD (sw_out_listhead, SWVoiceOut) sw_head;
 | 
			
		||||
    QLIST_HEAD (sw_cap_listhead, SWVoiceCap) cap_head;
 | 
			
		||||
    int ctl_caps;
 | 
			
		||||
    LIST_HEAD (sw_out_listhead, SWVoiceOut) sw_head;
 | 
			
		||||
    LIST_HEAD (sw_cap_listhead, SWVoiceCap) cap_head;
 | 
			
		||||
    struct audio_pcm_ops *pcm_ops;
 | 
			
		||||
    QLIST_ENTRY (HWVoiceOut) entries;
 | 
			
		||||
    LIST_ENTRY (HWVoiceOut) entries;
 | 
			
		||||
} HWVoiceOut;
 | 
			
		||||
 | 
			
		||||
typedef struct HWVoiceIn {
 | 
			
		||||
    int enabled;
 | 
			
		||||
    int poll_mode;
 | 
			
		||||
    struct audio_pcm_info info;
 | 
			
		||||
 | 
			
		||||
    t_sample *conv;
 | 
			
		||||
@@ -101,14 +98,12 @@ typedef struct HWVoiceIn {
 | 
			
		||||
    struct st_sample *conv_buf;
 | 
			
		||||
 | 
			
		||||
    int samples;
 | 
			
		||||
    QLIST_HEAD (sw_in_listhead, SWVoiceIn) sw_head;
 | 
			
		||||
    int ctl_caps;
 | 
			
		||||
    LIST_HEAD (sw_in_listhead, SWVoiceIn) sw_head;
 | 
			
		||||
    struct audio_pcm_ops *pcm_ops;
 | 
			
		||||
    QLIST_ENTRY (HWVoiceIn) entries;
 | 
			
		||||
    LIST_ENTRY (HWVoiceIn) entries;
 | 
			
		||||
} HWVoiceIn;
 | 
			
		||||
 | 
			
		||||
struct SWVoiceOut {
 | 
			
		||||
    QEMUSoundCard *card;
 | 
			
		||||
    struct audio_pcm_info info;
 | 
			
		||||
    t_sample *conv;
 | 
			
		||||
    int64_t ratio;
 | 
			
		||||
@@ -121,11 +116,10 @@ struct SWVoiceOut {
 | 
			
		||||
    char *name;
 | 
			
		||||
    struct mixeng_volume vol;
 | 
			
		||||
    struct audio_callback callback;
 | 
			
		||||
    QLIST_ENTRY (SWVoiceOut) entries;
 | 
			
		||||
    LIST_ENTRY (SWVoiceOut) entries;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct SWVoiceIn {
 | 
			
		||||
    QEMUSoundCard *card;
 | 
			
		||||
    int active;
 | 
			
		||||
    struct audio_pcm_info info;
 | 
			
		||||
    int64_t ratio;
 | 
			
		||||
@@ -137,7 +131,7 @@ struct SWVoiceIn {
 | 
			
		||||
    char *name;
 | 
			
		||||
    struct mixeng_volume vol;
 | 
			
		||||
    struct audio_callback callback;
 | 
			
		||||
    QLIST_ENTRY (SWVoiceIn) entries;
 | 
			
		||||
    LIST_ENTRY (SWVoiceIn) entries;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver {
 | 
			
		||||
@@ -152,13 +146,12 @@ struct audio_driver {
 | 
			
		||||
    int max_voices_in;
 | 
			
		||||
    int voice_size_out;
 | 
			
		||||
    int voice_size_in;
 | 
			
		||||
    int ctl_caps;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_pcm_ops {
 | 
			
		||||
    int  (*init_out)(HWVoiceOut *hw, struct audsettings *as);
 | 
			
		||||
    void (*fini_out)(HWVoiceOut *hw);
 | 
			
		||||
    int  (*run_out) (HWVoiceOut *hw, int live);
 | 
			
		||||
    int  (*run_out) (HWVoiceOut *hw);
 | 
			
		||||
    int  (*write)   (SWVoiceOut *sw, void *buf, int size);
 | 
			
		||||
    int  (*ctl_out) (HWVoiceOut *hw, int cmd, ...);
 | 
			
		||||
 | 
			
		||||
@@ -172,20 +165,20 @@ struct audio_pcm_ops {
 | 
			
		||||
struct capture_callback {
 | 
			
		||||
    struct audio_capture_ops ops;
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    QLIST_ENTRY (capture_callback) entries;
 | 
			
		||||
    LIST_ENTRY (capture_callback) entries;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct CaptureVoiceOut {
 | 
			
		||||
    HWVoiceOut hw;
 | 
			
		||||
    void *buf;
 | 
			
		||||
    QLIST_HEAD (cb_listhead, capture_callback) cb_head;
 | 
			
		||||
    QLIST_ENTRY (CaptureVoiceOut) entries;
 | 
			
		||||
    LIST_HEAD (cb_listhead, capture_callback) cb_head;
 | 
			
		||||
    LIST_ENTRY (CaptureVoiceOut) entries;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct SWVoiceCap {
 | 
			
		||||
    SWVoiceOut sw;
 | 
			
		||||
    CaptureVoiceOut *cap;
 | 
			
		||||
    QLIST_ENTRY (SWVoiceCap) entries;
 | 
			
		||||
    LIST_ENTRY (SWVoiceCap) entries;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct AudioState {
 | 
			
		||||
@@ -193,10 +186,10 @@ struct AudioState {
 | 
			
		||||
    void *drv_opaque;
 | 
			
		||||
 | 
			
		||||
    QEMUTimer *ts;
 | 
			
		||||
    QLIST_HEAD (card_listhead, QEMUSoundCard) card_head;
 | 
			
		||||
    QLIST_HEAD (hw_in_listhead, HWVoiceIn) hw_head_in;
 | 
			
		||||
    QLIST_HEAD (hw_out_listhead, HWVoiceOut) hw_head_out;
 | 
			
		||||
    QLIST_HEAD (cap_listhead, CaptureVoiceOut) cap_head;
 | 
			
		||||
    LIST_HEAD (card_listhead, QEMUSoundCard) card_head;
 | 
			
		||||
    LIST_HEAD (hw_in_listhead, HWVoiceIn) hw_head_in;
 | 
			
		||||
    LIST_HEAD (hw_out_listhead, HWVoiceOut) hw_head_out;
 | 
			
		||||
    LIST_HEAD (cap_listhead, CaptureVoiceOut) cap_head;
 | 
			
		||||
    int nb_hw_voices_out;
 | 
			
		||||
    int nb_hw_voices_in;
 | 
			
		||||
    int vm_running;
 | 
			
		||||
@@ -212,9 +205,7 @@ extern struct audio_driver coreaudio_audio_driver;
 | 
			
		||||
extern struct audio_driver dsound_audio_driver;
 | 
			
		||||
extern struct audio_driver esd_audio_driver;
 | 
			
		||||
extern struct audio_driver pa_audio_driver;
 | 
			
		||||
extern struct audio_driver spice_audio_driver;
 | 
			
		||||
extern struct audio_driver winwave_audio_driver;
 | 
			
		||||
extern const struct mixeng_volume nominal_volume;
 | 
			
		||||
extern struct mixeng_volume nominal_volume;
 | 
			
		||||
 | 
			
		||||
void audio_pcm_init_info (struct audio_pcm_info *info, struct audsettings *as);
 | 
			
		||||
void audio_pcm_info_clear_buf (struct audio_pcm_info *info, void *buf, int len);
 | 
			
		||||
@@ -223,33 +214,62 @@ int  audio_pcm_sw_write (SWVoiceOut *sw, void *buf, int len);
 | 
			
		||||
int  audio_pcm_hw_get_live_in (HWVoiceIn *hw);
 | 
			
		||||
 | 
			
		||||
int  audio_pcm_sw_read (SWVoiceIn *sw, void *buf, int len);
 | 
			
		||||
 | 
			
		||||
int audio_pcm_hw_clip_out (HWVoiceOut *hw, void *pcm_buf,
 | 
			
		||||
                           int live, int pending);
 | 
			
		||||
int  audio_pcm_hw_get_live_out (HWVoiceOut *hw);
 | 
			
		||||
int  audio_pcm_hw_get_live_out2 (HWVoiceOut *hw, int *nb_live);
 | 
			
		||||
 | 
			
		||||
int audio_bug (const char *funcname, int cond);
 | 
			
		||||
void *audio_calloc (const char *funcname, int nmemb, size_t size);
 | 
			
		||||
 | 
			
		||||
void audio_run (const char *msg);
 | 
			
		||||
 | 
			
		||||
#define VOICE_ENABLE 1
 | 
			
		||||
#define VOICE_DISABLE 2
 | 
			
		||||
#define VOICE_VOLUME 3
 | 
			
		||||
 | 
			
		||||
#define VOICE_VOLUME_CAP (1 << VOICE_VOLUME)
 | 
			
		||||
 | 
			
		||||
static inline int audio_ring_dist (int dst, int src, int len)
 | 
			
		||||
{
 | 
			
		||||
    return (dst >= src) ? (dst - src) : (len - src + dst);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#define dolog(fmt, ...) AUD_log(AUDIO_CAP, fmt, ## __VA_ARGS__)
 | 
			
		||||
#if defined __GNUC__
 | 
			
		||||
#define GCC_ATTR __attribute__ ((__unused__, __format__ (__printf__, 1, 2)))
 | 
			
		||||
#define INIT_FIELD(f) . f
 | 
			
		||||
#define GCC_FMT_ATTR(n, m) __attribute__ ((__format__ (__printf__, n, m)))
 | 
			
		||||
#else
 | 
			
		||||
#define GCC_ATTR /**/
 | 
			
		||||
#define INIT_FIELD(f) /**/
 | 
			
		||||
#define GCC_FMT_ATTR(n, m)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static void GCC_ATTR dolog (const char *fmt, ...)
 | 
			
		||||
{
 | 
			
		||||
    va_list ap;
 | 
			
		||||
 | 
			
		||||
    va_start (ap, fmt);
 | 
			
		||||
    AUD_vlog (AUDIO_CAP, fmt, ap);
 | 
			
		||||
    va_end (ap);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG
 | 
			
		||||
#define ldebug(fmt, ...) AUD_log(AUDIO_CAP, fmt, ## __VA_ARGS__)
 | 
			
		||||
static void GCC_ATTR ldebug (const char *fmt, ...)
 | 
			
		||||
{
 | 
			
		||||
    va_list ap;
 | 
			
		||||
 | 
			
		||||
    va_start (ap, fmt);
 | 
			
		||||
    AUD_vlog (AUDIO_CAP, fmt, ap);
 | 
			
		||||
    va_end (ap);
 | 
			
		||||
}
 | 
			
		||||
#else
 | 
			
		||||
#define ldebug(fmt, ...) (void)0
 | 
			
		||||
#if defined NDEBUG && defined __GNUC__
 | 
			
		||||
#define ldebug(...)
 | 
			
		||||
#elif defined NDEBUG && defined _MSC_VER
 | 
			
		||||
#define ldebug __noop
 | 
			
		||||
#else
 | 
			
		||||
static void GCC_ATTR ldebug (const char *fmt, ...)
 | 
			
		||||
{
 | 
			
		||||
    (void) fmt;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#undef GCC_ATTR
 | 
			
		||||
 | 
			
		||||
#define AUDIO_STRINGIFY_(n) #n
 | 
			
		||||
#define AUDIO_STRINGIFY(n) AUDIO_STRINGIFY_(n)
 | 
			
		||||
 
 | 
			
		||||
@@ -6,8 +6,7 @@
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
#include "audio_pt_int.h"
 | 
			
		||||
 | 
			
		||||
static void GCC_FMT_ATTR(3, 4) logerr (struct audio_pt *pt, int err,
 | 
			
		||||
                                       const char *fmt, ...)
 | 
			
		||||
static void logerr (struct audio_pt *pt, int err, const char *fmt, ...)
 | 
			
		||||
{
 | 
			
		||||
    va_list ap;
 | 
			
		||||
 | 
			
		||||
@@ -24,16 +23,9 @@ int audio_pt_init (struct audio_pt *p, void *(*func) (void *),
 | 
			
		||||
{
 | 
			
		||||
    int err, err2;
 | 
			
		||||
    const char *efunc;
 | 
			
		||||
    sigset_t set, old_set;
 | 
			
		||||
 | 
			
		||||
    p->drv = drv;
 | 
			
		||||
 | 
			
		||||
    err = sigfillset (&set);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        logerr (p, errno, "%s(%s): sigfillset failed", cap, AUDIO_FUNC);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = pthread_mutex_init (&p->mutex, NULL);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        efunc = "pthread_mutex_init";
 | 
			
		||||
@@ -46,23 +38,7 @@ int audio_pt_init (struct audio_pt *p, void *(*func) (void *),
 | 
			
		||||
        goto err1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = pthread_sigmask (SIG_BLOCK, &set, &old_set);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        efunc = "pthread_sigmask";
 | 
			
		||||
        goto err2;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = pthread_create (&p->thread, NULL, func, opaque);
 | 
			
		||||
 | 
			
		||||
    err2 = pthread_sigmask (SIG_SETMASK, &old_set, NULL);
 | 
			
		||||
    if (err2) {
 | 
			
		||||
        logerr (p, err2, "%s(%s): pthread_sigmask (restore) failed",
 | 
			
		||||
                cap, AUDIO_FUNC);
 | 
			
		||||
        /* We have failed to restore original signal mask, all bets are off,
 | 
			
		||||
           so terminate the process */
 | 
			
		||||
        exit (EXIT_FAILURE);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (err) {
 | 
			
		||||
        efunc = "pthread_create";
 | 
			
		||||
        goto err2;
 | 
			
		||||
 
 | 
			
		||||
@@ -36,9 +36,11 @@
 | 
			
		||||
#define HWBUF hw->conv_buf
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static void glue (audio_init_nb_voices_, TYPE) (struct audio_driver *drv)
 | 
			
		||||
static void glue (audio_init_nb_voices_, TYPE) (
 | 
			
		||||
    AudioState *s,
 | 
			
		||||
    struct audio_driver *drv
 | 
			
		||||
    )
 | 
			
		||||
{
 | 
			
		||||
    AudioState *s = &glob_audio_state;
 | 
			
		||||
    int max_voices = glue (drv->max_voices_, TYPE);
 | 
			
		||||
    int voice_size = glue (drv->voice_size_, TYPE);
 | 
			
		||||
 | 
			
		||||
@@ -71,7 +73,10 @@ static void glue (audio_init_nb_voices_, TYPE) (struct audio_driver *drv)
 | 
			
		||||
 | 
			
		||||
static void glue (audio_pcm_hw_free_resources_, TYPE) (HW *hw)
 | 
			
		||||
{
 | 
			
		||||
    g_free (HWBUF);
 | 
			
		||||
    if (HWBUF) {
 | 
			
		||||
        qemu_free (HWBUF);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    HWBUF = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -89,7 +94,9 @@ static int glue (audio_pcm_hw_alloc_resources_, TYPE) (HW *hw)
 | 
			
		||||
 | 
			
		||||
static void glue (audio_pcm_sw_free_resources_, TYPE) (SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    g_free (sw->buf);
 | 
			
		||||
    if (sw->buf) {
 | 
			
		||||
        qemu_free (sw->buf);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (sw->rate) {
 | 
			
		||||
        st_rate_stop (sw->rate);
 | 
			
		||||
@@ -103,7 +110,11 @@ static int glue (audio_pcm_sw_alloc_resources_, TYPE) (SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    int samples;
 | 
			
		||||
 | 
			
		||||
#ifdef DAC
 | 
			
		||||
    samples = sw->hw->samples;
 | 
			
		||||
#else
 | 
			
		||||
    samples = ((int64_t) sw->hw->samples << 32) / sw->ratio;
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    sw->buf = audio_calloc (AUDIO_FUNC, samples, sizeof (struct st_sample));
 | 
			
		||||
    if (!sw->buf) {
 | 
			
		||||
@@ -118,7 +129,7 @@ static int glue (audio_pcm_sw_alloc_resources_, TYPE) (SW *sw)
 | 
			
		||||
    sw->rate = st_rate_start (sw->hw->info.freq, sw->info.freq);
 | 
			
		||||
#endif
 | 
			
		||||
    if (!sw->rate) {
 | 
			
		||||
        g_free (sw->buf);
 | 
			
		||||
        qemu_free (sw->buf);
 | 
			
		||||
        sw->buf = NULL;
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
@@ -155,10 +166,10 @@ static int glue (audio_pcm_sw_init_, TYPE) (
 | 
			
		||||
        [sw->info.swap_endianness]
 | 
			
		||||
        [audio_bits_to_index (sw->info.bits)];
 | 
			
		||||
 | 
			
		||||
    sw->name = g_strdup (name);
 | 
			
		||||
    sw->name = qemu_strdup (name);
 | 
			
		||||
    err = glue (audio_pcm_sw_alloc_resources_, TYPE) (sw);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        g_free (sw->name);
 | 
			
		||||
        qemu_free (sw->name);
 | 
			
		||||
        sw->name = NULL;
 | 
			
		||||
    }
 | 
			
		||||
    return err;
 | 
			
		||||
@@ -167,47 +178,47 @@ static int glue (audio_pcm_sw_init_, TYPE) (
 | 
			
		||||
static void glue (audio_pcm_sw_fini_, TYPE) (SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    glue (audio_pcm_sw_free_resources_, TYPE) (sw);
 | 
			
		||||
    g_free (sw->name);
 | 
			
		||||
    sw->name = NULL;
 | 
			
		||||
    if (sw->name) {
 | 
			
		||||
        qemu_free (sw->name);
 | 
			
		||||
        sw->name = NULL;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void glue (audio_pcm_hw_add_sw_, TYPE) (HW *hw, SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    QLIST_INSERT_HEAD (&hw->sw_head, sw, entries);
 | 
			
		||||
    LIST_INSERT_HEAD (&hw->sw_head, sw, entries);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void glue (audio_pcm_hw_del_sw_, TYPE) (SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    QLIST_REMOVE (sw, entries);
 | 
			
		||||
    LIST_REMOVE (sw, entries);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void glue (audio_pcm_hw_gc_, TYPE) (HW **hwp)
 | 
			
		||||
static void glue (audio_pcm_hw_gc_, TYPE) (AudioState *s, HW **hwp)
 | 
			
		||||
{
 | 
			
		||||
    AudioState *s = &glob_audio_state;
 | 
			
		||||
    HW *hw = *hwp;
 | 
			
		||||
 | 
			
		||||
    if (!hw->sw_head.lh_first) {
 | 
			
		||||
#ifdef DAC
 | 
			
		||||
        audio_detach_capture (hw);
 | 
			
		||||
#endif
 | 
			
		||||
        QLIST_REMOVE (hw, entries);
 | 
			
		||||
        LIST_REMOVE (hw, entries);
 | 
			
		||||
        glue (s->nb_hw_voices_, TYPE) += 1;
 | 
			
		||||
        glue (audio_pcm_hw_free_resources_ ,TYPE) (hw);
 | 
			
		||||
        glue (hw->pcm_ops->fini_, TYPE) (hw);
 | 
			
		||||
        g_free (hw);
 | 
			
		||||
        qemu_free (hw);
 | 
			
		||||
        *hwp = NULL;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static HW *glue (audio_pcm_hw_find_any_, TYPE) (HW *hw)
 | 
			
		||||
static HW *glue (audio_pcm_hw_find_any_, TYPE) (AudioState *s, HW *hw)
 | 
			
		||||
{
 | 
			
		||||
    AudioState *s = &glob_audio_state;
 | 
			
		||||
    return hw ? hw->entries.le_next : glue (s->hw_head_, TYPE).lh_first;
 | 
			
		||||
    return hw ? hw->entries.le_next : s->glue (hw_head_, TYPE).lh_first;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static HW *glue (audio_pcm_hw_find_any_enabled_, TYPE) (HW *hw)
 | 
			
		||||
static HW *glue (audio_pcm_hw_find_any_enabled_, TYPE) (AudioState *s, HW *hw)
 | 
			
		||||
{
 | 
			
		||||
    while ((hw = glue (audio_pcm_hw_find_any_, TYPE) (hw))) {
 | 
			
		||||
    while ((hw = glue (audio_pcm_hw_find_any_, TYPE) (s, hw))) {
 | 
			
		||||
        if (hw->enabled) {
 | 
			
		||||
            return hw;
 | 
			
		||||
        }
 | 
			
		||||
@@ -216,11 +227,12 @@ static HW *glue (audio_pcm_hw_find_any_enabled_, TYPE) (HW *hw)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static HW *glue (audio_pcm_hw_find_specific_, TYPE) (
 | 
			
		||||
    AudioState *s,
 | 
			
		||||
    HW *hw,
 | 
			
		||||
    struct audsettings *as
 | 
			
		||||
    )
 | 
			
		||||
{
 | 
			
		||||
    while ((hw = glue (audio_pcm_hw_find_any_, TYPE) (hw))) {
 | 
			
		||||
    while ((hw = glue (audio_pcm_hw_find_any_, TYPE) (s, hw))) {
 | 
			
		||||
        if (audio_pcm_info_eq (&hw->info, as)) {
 | 
			
		||||
            return hw;
 | 
			
		||||
        }
 | 
			
		||||
@@ -228,10 +240,10 @@ static HW *glue (audio_pcm_hw_find_specific_, TYPE) (
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static HW *glue (audio_pcm_hw_add_new_, TYPE) (struct audsettings *as)
 | 
			
		||||
static HW *glue (audio_pcm_hw_add_new_, TYPE) (AudioState *s,
 | 
			
		||||
                                               struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    HW *hw;
 | 
			
		||||
    AudioState *s = &glob_audio_state;
 | 
			
		||||
    struct audio_driver *drv = s->drv;
 | 
			
		||||
 | 
			
		||||
    if (!glue (s->nb_hw_voices_, TYPE)) {
 | 
			
		||||
@@ -256,11 +268,9 @@ static HW *glue (audio_pcm_hw_add_new_, TYPE) (struct audsettings *as)
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw->pcm_ops = drv->pcm_ops;
 | 
			
		||||
    hw->ctl_caps = drv->ctl_caps;
 | 
			
		||||
 | 
			
		||||
    QLIST_INIT (&hw->sw_head);
 | 
			
		||||
    LIST_INIT (&hw->sw_head);
 | 
			
		||||
#ifdef DAC
 | 
			
		||||
    QLIST_INIT (&hw->cap_head);
 | 
			
		||||
    LIST_INIT (&hw->cap_head);
 | 
			
		||||
#endif
 | 
			
		||||
    if (glue (hw->pcm_ops->init_, TYPE) (hw, as)) {
 | 
			
		||||
        goto err0;
 | 
			
		||||
@@ -285,45 +295,47 @@ static HW *glue (audio_pcm_hw_add_new_, TYPE) (struct audsettings *as)
 | 
			
		||||
        goto err1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    QLIST_INSERT_HEAD (&s->glue (hw_head_, TYPE), hw, entries);
 | 
			
		||||
    LIST_INSERT_HEAD (&s->glue (hw_head_, TYPE), hw, entries);
 | 
			
		||||
    glue (s->nb_hw_voices_, TYPE) -= 1;
 | 
			
		||||
#ifdef DAC
 | 
			
		||||
    audio_attach_capture (hw);
 | 
			
		||||
    audio_attach_capture (s, hw);
 | 
			
		||||
#endif
 | 
			
		||||
    return hw;
 | 
			
		||||
 | 
			
		||||
 err1:
 | 
			
		||||
    glue (hw->pcm_ops->fini_, TYPE) (hw);
 | 
			
		||||
 err0:
 | 
			
		||||
    g_free (hw);
 | 
			
		||||
    qemu_free (hw);
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static HW *glue (audio_pcm_hw_add_, TYPE) (struct audsettings *as)
 | 
			
		||||
static HW *glue (audio_pcm_hw_add_, TYPE) (AudioState *s,
 | 
			
		||||
                                           struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    HW *hw;
 | 
			
		||||
 | 
			
		||||
    if (glue (conf.fixed_, TYPE).enabled && glue (conf.fixed_, TYPE).greedy) {
 | 
			
		||||
        hw = glue (audio_pcm_hw_add_new_, TYPE) (as);
 | 
			
		||||
        hw = glue (audio_pcm_hw_add_new_, TYPE) (s, as);
 | 
			
		||||
        if (hw) {
 | 
			
		||||
            return hw;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw = glue (audio_pcm_hw_find_specific_, TYPE) (NULL, as);
 | 
			
		||||
    hw = glue (audio_pcm_hw_find_specific_, TYPE) (s, NULL, as);
 | 
			
		||||
    if (hw) {
 | 
			
		||||
        return hw;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw = glue (audio_pcm_hw_add_new_, TYPE) (as);
 | 
			
		||||
    hw = glue (audio_pcm_hw_add_new_, TYPE) (s, as);
 | 
			
		||||
    if (hw) {
 | 
			
		||||
        return hw;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return glue (audio_pcm_hw_find_any_, TYPE) (NULL);
 | 
			
		||||
    return glue (audio_pcm_hw_find_any_, TYPE) (s, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static SW *glue (audio_pcm_create_voice_pair_, TYPE) (
 | 
			
		||||
    AudioState *s,
 | 
			
		||||
    const char *sw_name,
 | 
			
		||||
    struct audsettings *as
 | 
			
		||||
    )
 | 
			
		||||
@@ -346,7 +358,7 @@ static SW *glue (audio_pcm_create_voice_pair_, TYPE) (
 | 
			
		||||
        goto err1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw = glue (audio_pcm_hw_add_, TYPE) (&hw_as);
 | 
			
		||||
    hw = glue (audio_pcm_hw_add_, TYPE) (s, &hw_as);
 | 
			
		||||
    if (!hw) {
 | 
			
		||||
        goto err2;
 | 
			
		||||
    }
 | 
			
		||||
@@ -361,30 +373,31 @@ static SW *glue (audio_pcm_create_voice_pair_, TYPE) (
 | 
			
		||||
 | 
			
		||||
err3:
 | 
			
		||||
    glue (audio_pcm_hw_del_sw_, TYPE) (sw);
 | 
			
		||||
    glue (audio_pcm_hw_gc_, TYPE) (&hw);
 | 
			
		||||
    glue (audio_pcm_hw_gc_, TYPE) (s, &hw);
 | 
			
		||||
err2:
 | 
			
		||||
    g_free (sw);
 | 
			
		||||
    qemu_free (sw);
 | 
			
		||||
err1:
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void glue (audio_close_, TYPE) (SW *sw)
 | 
			
		||||
static void glue (audio_close_, TYPE) (AudioState *s, SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    glue (audio_pcm_sw_fini_, TYPE) (sw);
 | 
			
		||||
    glue (audio_pcm_hw_del_sw_, TYPE) (sw);
 | 
			
		||||
    glue (audio_pcm_hw_gc_, TYPE) (&sw->hw);
 | 
			
		||||
    g_free (sw);
 | 
			
		||||
    glue (audio_pcm_hw_gc_, TYPE) (s, &sw->hw);
 | 
			
		||||
    qemu_free (sw);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void glue (AUD_close_, TYPE) (QEMUSoundCard *card, SW *sw)
 | 
			
		||||
{
 | 
			
		||||
    if (sw) {
 | 
			
		||||
        if (audio_bug (AUDIO_FUNC, !card)) {
 | 
			
		||||
            dolog ("card=%p\n", card);
 | 
			
		||||
        if (audio_bug (AUDIO_FUNC, !card || !card->audio)) {
 | 
			
		||||
            dolog ("card=%p card->audio=%p\n",
 | 
			
		||||
                   card, card ? card->audio : NULL);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        glue (audio_close_, TYPE) (sw);
 | 
			
		||||
        glue (audio_close_, TYPE) (card->audio, sw);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -393,24 +406,27 @@ SW *glue (AUD_open_, TYPE) (
 | 
			
		||||
    SW *sw,
 | 
			
		||||
    const char *name,
 | 
			
		||||
    void *callback_opaque ,
 | 
			
		||||
    audio_callback_fn callback_fn,
 | 
			
		||||
    audio_callback_fn_t callback_fn,
 | 
			
		||||
    struct audsettings *as
 | 
			
		||||
    )
 | 
			
		||||
{
 | 
			
		||||
    AudioState *s = &glob_audio_state;
 | 
			
		||||
    AudioState *s;
 | 
			
		||||
#ifdef DAC
 | 
			
		||||
    int live = 0;
 | 
			
		||||
    SW *old_sw = NULL;
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    if (audio_bug (AUDIO_FUNC, !card || !name || !callback_fn || !as)) {
 | 
			
		||||
        dolog ("card=%p name=%p callback_fn=%p as=%p\n",
 | 
			
		||||
               card, name, callback_fn, as);
 | 
			
		||||
    ldebug ("open %s, freq %d, nchannels %d, fmt %d\n",
 | 
			
		||||
            name, as->freq, as->nchannels, as->fmt);
 | 
			
		||||
 | 
			
		||||
    if (audio_bug (AUDIO_FUNC,
 | 
			
		||||
                   !card || !card->audio || !name || !callback_fn || !as)) {
 | 
			
		||||
        dolog ("card=%p card->audio=%p name=%p callback_fn=%p as=%p\n",
 | 
			
		||||
               card, card ? card->audio : NULL, name, callback_fn, as);
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ldebug ("open %s, freq %d, nchannels %d, fmt %d\n",
 | 
			
		||||
            name, as->freq, as->nchannels, as->fmt);
 | 
			
		||||
    s = card->audio;
 | 
			
		||||
 | 
			
		||||
    if (audio_bug (AUDIO_FUNC, audio_validate_settings (as))) {
 | 
			
		||||
        audio_print_settings (as);
 | 
			
		||||
@@ -436,9 +452,9 @@ SW *glue (AUD_open_, TYPE) (
 | 
			
		||||
               SW_NAME (sw), sw->info.freq, sw->info.bits, sw->info.nchannels);
 | 
			
		||||
        dolog ("New %s freq %d, bits %d, channels %d\n",
 | 
			
		||||
               name,
 | 
			
		||||
               as->freq,
 | 
			
		||||
               (as->fmt == AUD_FMT_S16 || as->fmt == AUD_FMT_U16) ? 16 : 8,
 | 
			
		||||
               as->nchannels);
 | 
			
		||||
               freq,
 | 
			
		||||
               (fmt == AUD_FMT_S16 || fmt == AUD_FMT_U16) ? 16 : 8,
 | 
			
		||||
               nchannels);
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
        if (live) {
 | 
			
		||||
@@ -469,37 +485,38 @@ SW *glue (AUD_open_, TYPE) (
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    else {
 | 
			
		||||
        sw = glue (audio_pcm_create_voice_pair_, TYPE) (name, as);
 | 
			
		||||
        sw = glue (audio_pcm_create_voice_pair_, TYPE) (s, name, as);
 | 
			
		||||
        if (!sw) {
 | 
			
		||||
            dolog ("Failed to create voice `%s'\n", name);
 | 
			
		||||
            return NULL;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    sw->card = card;
 | 
			
		||||
    sw->vol = nominal_volume;
 | 
			
		||||
    sw->callback.fn = callback_fn;
 | 
			
		||||
    sw->callback.opaque = callback_opaque;
 | 
			
		||||
    if (sw) {
 | 
			
		||||
        sw->vol = nominal_volume;
 | 
			
		||||
        sw->callback.fn = callback_fn;
 | 
			
		||||
        sw->callback.opaque = callback_opaque;
 | 
			
		||||
 | 
			
		||||
#ifdef DAC
 | 
			
		||||
    if (live) {
 | 
			
		||||
        int mixed =
 | 
			
		||||
            (live << old_sw->info.shift)
 | 
			
		||||
            * old_sw->info.bytes_per_second
 | 
			
		||||
            / sw->info.bytes_per_second;
 | 
			
		||||
        if (live) {
 | 
			
		||||
            int mixed =
 | 
			
		||||
                (live << old_sw->info.shift)
 | 
			
		||||
                * old_sw->info.bytes_per_second
 | 
			
		||||
                / sw->info.bytes_per_second;
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG_PLIVE
 | 
			
		||||
        dolog ("Silence will be mixed %d\n", mixed);
 | 
			
		||||
            dolog ("Silence will be mixed %d\n", mixed);
 | 
			
		||||
#endif
 | 
			
		||||
        sw->total_hw_samples_mixed += mixed;
 | 
			
		||||
    }
 | 
			
		||||
            sw->total_hw_samples_mixed += mixed;
 | 
			
		||||
        }
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG_AUDIO
 | 
			
		||||
    dolog ("%s\n", name);
 | 
			
		||||
    audio_pcm_print_info ("hw", &sw->hw->info);
 | 
			
		||||
    audio_pcm_print_info ("sw", &sw->info);
 | 
			
		||||
        dolog ("%s\n", name);
 | 
			
		||||
        audio_pcm_print_info ("hw", &sw->hw->info);
 | 
			
		||||
        audio_pcm_print_info ("sw", &sw->info);
 | 
			
		||||
#endif
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return sw;
 | 
			
		||||
 | 
			
		||||
@@ -532,7 +549,7 @@ uint64_t glue (AUD_get_elapsed_usec_, TYPE) (SW *sw, QEMUAudioTimeStamp *ts)
 | 
			
		||||
 | 
			
		||||
    cur_ts = sw->hw->ts_helper;
 | 
			
		||||
    old_ts = ts->old_ts;
 | 
			
		||||
    /* dolog ("cur %" PRId64 " old %" PRId64 "\n", cur_ts, old_ts); */
 | 
			
		||||
    /* dolog ("cur %lld old %lld\n", cur_ts, old_ts); */
 | 
			
		||||
 | 
			
		||||
    if (cur_ts >= old_ts) {
 | 
			
		||||
        delta = cur_ts - old_ts;
 | 
			
		||||
@@ -545,7 +562,7 @@ uint64_t glue (AUD_get_elapsed_usec_, TYPE) (SW *sw, QEMUAudioTimeStamp *ts)
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return muldiv64 (delta, sw->hw->info.freq, 1000000);
 | 
			
		||||
    return (delta * sw->hw->info.freq) / 1000000;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#undef TYPE
 | 
			
		||||
 
 | 
			
		||||
@@ -1,107 +0,0 @@
 | 
			
		||||
/* public domain */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "win-int"
 | 
			
		||||
#include <windows.h>
 | 
			
		||||
#include <mmsystem.h>
 | 
			
		||||
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
#include "audio_win_int.h"
 | 
			
		||||
 | 
			
		||||
int waveformat_from_audio_settings (WAVEFORMATEX *wfx,
 | 
			
		||||
                                    struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    memset (wfx, 0, sizeof (*wfx));
 | 
			
		||||
 | 
			
		||||
    wfx->wFormatTag = WAVE_FORMAT_PCM;
 | 
			
		||||
    wfx->nChannels = as->nchannels;
 | 
			
		||||
    wfx->nSamplesPerSec = as->freq;
 | 
			
		||||
    wfx->nAvgBytesPerSec = as->freq << (as->nchannels == 2);
 | 
			
		||||
    wfx->nBlockAlign = 1 << (as->nchannels == 2);
 | 
			
		||||
    wfx->cbSize = 0;
 | 
			
		||||
 | 
			
		||||
    switch (as->fmt) {
 | 
			
		||||
    case AUD_FMT_S8:
 | 
			
		||||
    case AUD_FMT_U8:
 | 
			
		||||
        wfx->wBitsPerSample = 8;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S16:
 | 
			
		||||
    case AUD_FMT_U16:
 | 
			
		||||
        wfx->wBitsPerSample = 16;
 | 
			
		||||
        wfx->nAvgBytesPerSec <<= 1;
 | 
			
		||||
        wfx->nBlockAlign <<= 1;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S32:
 | 
			
		||||
    case AUD_FMT_U32:
 | 
			
		||||
        wfx->wBitsPerSample = 32;
 | 
			
		||||
        wfx->nAvgBytesPerSec <<= 2;
 | 
			
		||||
        wfx->nBlockAlign <<= 2;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Internal logic error: Bad audio format %d\n", as->freq);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int waveformat_to_audio_settings (WAVEFORMATEX *wfx,
 | 
			
		||||
                                  struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    if (wfx->wFormatTag != WAVE_FORMAT_PCM) {
 | 
			
		||||
        dolog ("Invalid wave format, tag is not PCM, but %d\n",
 | 
			
		||||
               wfx->wFormatTag);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!wfx->nSamplesPerSec) {
 | 
			
		||||
        dolog ("Invalid wave format, frequency is zero\n");
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    as->freq = wfx->nSamplesPerSec;
 | 
			
		||||
 | 
			
		||||
    switch (wfx->nChannels) {
 | 
			
		||||
    case 1:
 | 
			
		||||
        as->nchannels = 1;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 2:
 | 
			
		||||
        as->nchannels = 2;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog (
 | 
			
		||||
            "Invalid wave format, number of channels is not 1 or 2, but %d\n",
 | 
			
		||||
            wfx->nChannels
 | 
			
		||||
            );
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    switch (wfx->wBitsPerSample) {
 | 
			
		||||
    case 8:
 | 
			
		||||
        as->fmt = AUD_FMT_U8;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 16:
 | 
			
		||||
        as->fmt = AUD_FMT_S16;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 32:
 | 
			
		||||
        as->fmt = AUD_FMT_S32;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Invalid wave format, bits per sample is not "
 | 
			
		||||
               "8, 16 or 32, but %d\n",
 | 
			
		||||
               wfx->wBitsPerSample);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -1,10 +0,0 @@
 | 
			
		||||
#ifndef AUDIO_WIN_INT_H
 | 
			
		||||
#define AUDIO_WIN_INT_H
 | 
			
		||||
 | 
			
		||||
int waveformat_from_audio_settings (WAVEFORMATEX *wfx,
 | 
			
		||||
                                    struct audsettings *as);
 | 
			
		||||
 | 
			
		||||
int waveformat_to_audio_settings (WAVEFORMATEX *wfx,
 | 
			
		||||
                                  struct audsettings *as);
 | 
			
		||||
 | 
			
		||||
#endif /* AUDIO_WIN_INT_H */
 | 
			
		||||
@@ -56,7 +56,7 @@ typedef struct coreaudioVoiceOut {
 | 
			
		||||
 | 
			
		||||
static void coreaudio_logstatus (OSStatus status)
 | 
			
		||||
{
 | 
			
		||||
    const char *str = "BUG";
 | 
			
		||||
    char *str = "BUG";
 | 
			
		||||
 | 
			
		||||
    switch(status) {
 | 
			
		||||
    case kAudioHardwareNoError:
 | 
			
		||||
@@ -104,7 +104,7 @@ static void coreaudio_logstatus (OSStatus status)
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        AUD_log (AUDIO_CAP, "Reason: status code %" PRId32 "\n", (int32_t)status);
 | 
			
		||||
        AUD_log (AUDIO_CAP, "Reason: status code %ld\n", status);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
@@ -190,15 +190,17 @@ static int coreaudio_unlock (coreaudioVoiceOut *core, const char *fn_name)
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coreaudio_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int coreaudio_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    int decr;
 | 
			
		||||
    int live, decr;
 | 
			
		||||
    coreaudioVoiceOut *core = (coreaudioVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    if (coreaudio_lock (core, "coreaudio_run_out")) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
 | 
			
		||||
    if (core->decr > live) {
 | 
			
		||||
        ldebug ("core->decr %d live %d core->live %d\n",
 | 
			
		||||
                core->decr,
 | 
			
		||||
@@ -360,8 +362,8 @@ static int coreaudio_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
        &core->audioDevicePropertyBufferFrameSize);
 | 
			
		||||
    if (status != kAudioHardwareNoError) {
 | 
			
		||||
        coreaudio_logerr2 (status, typ,
 | 
			
		||||
                           "Could not set device buffer frame size %" PRIu32 "\n",
 | 
			
		||||
                           (uint32_t)core->audioDevicePropertyBufferFrameSize);
 | 
			
		||||
                           "Could not set device buffer frame size %ld\n",
 | 
			
		||||
                           core->audioDevicePropertyBufferFrameSize);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
@@ -511,39 +513,38 @@ static void coreaudio_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option coreaudio_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "BUFFER_SIZE",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.buffer_frames,
 | 
			
		||||
        .descr = "Size of the buffer in frames"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "BUFFER_COUNT",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.nbuffers,
 | 
			
		||||
        .descr = "Number of buffers"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"BUFFER_SIZE", AUD_OPT_INT, &conf.buffer_frames,
 | 
			
		||||
     "Size of the buffer in frames", NULL, 0},
 | 
			
		||||
    {"BUFFER_COUNT", AUD_OPT_INT, &conf.nbuffers,
 | 
			
		||||
     "Number of buffers", NULL, 0},
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops coreaudio_pcm_ops = {
 | 
			
		||||
    .init_out = coreaudio_init_out,
 | 
			
		||||
    .fini_out = coreaudio_fini_out,
 | 
			
		||||
    .run_out  = coreaudio_run_out,
 | 
			
		||||
    .write    = coreaudio_write,
 | 
			
		||||
    .ctl_out  = coreaudio_ctl_out
 | 
			
		||||
    coreaudio_init_out,
 | 
			
		||||
    coreaudio_fini_out,
 | 
			
		||||
    coreaudio_run_out,
 | 
			
		||||
    coreaudio_write,
 | 
			
		||||
    coreaudio_ctl_out,
 | 
			
		||||
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver coreaudio_audio_driver = {
 | 
			
		||||
    .name           = "coreaudio",
 | 
			
		||||
    .descr          = "CoreAudio http://developer.apple.com/audio/coreaudio.html",
 | 
			
		||||
    .options        = coreaudio_options,
 | 
			
		||||
    .init           = coreaudio_audio_init,
 | 
			
		||||
    .fini           = coreaudio_audio_fini,
 | 
			
		||||
    .pcm_ops        = &coreaudio_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = 1,
 | 
			
		||||
    .max_voices_in  = 0,
 | 
			
		||||
    .voice_size_out = sizeof (coreaudioVoiceOut),
 | 
			
		||||
    .voice_size_in  = 0
 | 
			
		||||
    INIT_FIELD (name           = ) "coreaudio",
 | 
			
		||||
    INIT_FIELD (descr          = )
 | 
			
		||||
    "CoreAudio http://developer.apple.com/audio/coreaudio.html",
 | 
			
		||||
    INIT_FIELD (options        = ) coreaudio_options,
 | 
			
		||||
    INIT_FIELD (init           = ) coreaudio_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) coreaudio_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &coreaudio_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) 0,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (coreaudioVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) 0
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
@@ -32,13 +32,12 @@
 | 
			
		||||
#define AUDIO_CAP "dsound"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
 | 
			
		||||
#define WIN32_LEAN_AND_MEAN
 | 
			
		||||
#include <windows.h>
 | 
			
		||||
#include <mmsystem.h>
 | 
			
		||||
#include <objbase.h>
 | 
			
		||||
#include <dsound.h>
 | 
			
		||||
 | 
			
		||||
#include "audio_win_int.h"
 | 
			
		||||
 | 
			
		||||
/* #define DEBUG_DSOUND */
 | 
			
		||||
 | 
			
		||||
static struct {
 | 
			
		||||
@@ -51,16 +50,18 @@ static struct {
 | 
			
		||||
    struct audsettings settings;
 | 
			
		||||
    int latency_millis;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .lock_retries       = 1,
 | 
			
		||||
    .restore_retries    = 1,
 | 
			
		||||
    .getstatus_retries  = 1,
 | 
			
		||||
    .set_primary        = 0,
 | 
			
		||||
    .bufsize_in         = 16384,
 | 
			
		||||
    .bufsize_out        = 16384,
 | 
			
		||||
    .settings.freq      = 44100,
 | 
			
		||||
    .settings.nchannels = 2,
 | 
			
		||||
    .settings.fmt       = AUD_FMT_S16,
 | 
			
		||||
    .latency_millis     = 10
 | 
			
		||||
    1,
 | 
			
		||||
    1,
 | 
			
		||||
    1,
 | 
			
		||||
    0,
 | 
			
		||||
    16384,
 | 
			
		||||
    16384,
 | 
			
		||||
    {
 | 
			
		||||
        44100,
 | 
			
		||||
        2,
 | 
			
		||||
        AUD_FMT_S16
 | 
			
		||||
    },
 | 
			
		||||
    10
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
@@ -306,6 +307,101 @@ static int dsound_restore_out (LPDIRECTSOUNDBUFFER dsb)
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int waveformat_from_audio_settings (WAVEFORMATEX *wfx,
 | 
			
		||||
                                           struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    memset (wfx, 0, sizeof (*wfx));
 | 
			
		||||
 | 
			
		||||
    wfx->wFormatTag = WAVE_FORMAT_PCM;
 | 
			
		||||
    wfx->nChannels = as->nchannels;
 | 
			
		||||
    wfx->nSamplesPerSec = as->freq;
 | 
			
		||||
    wfx->nAvgBytesPerSec = as->freq << (as->nchannels == 2);
 | 
			
		||||
    wfx->nBlockAlign = 1 << (as->nchannels == 2);
 | 
			
		||||
    wfx->cbSize = 0;
 | 
			
		||||
 | 
			
		||||
    switch (as->fmt) {
 | 
			
		||||
    case AUD_FMT_S8:
 | 
			
		||||
    case AUD_FMT_U8:
 | 
			
		||||
        wfx->wBitsPerSample = 8;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S16:
 | 
			
		||||
    case AUD_FMT_U16:
 | 
			
		||||
        wfx->wBitsPerSample = 16;
 | 
			
		||||
        wfx->nAvgBytesPerSec <<= 1;
 | 
			
		||||
        wfx->nBlockAlign <<= 1;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S32:
 | 
			
		||||
    case AUD_FMT_U32:
 | 
			
		||||
        wfx->wBitsPerSample = 32;
 | 
			
		||||
        wfx->nAvgBytesPerSec <<= 2;
 | 
			
		||||
        wfx->nBlockAlign <<= 2;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Internal logic error: Bad audio format %d\n", as->freq);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int waveformat_to_audio_settings (WAVEFORMATEX *wfx,
 | 
			
		||||
                                         struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    if (wfx->wFormatTag != WAVE_FORMAT_PCM) {
 | 
			
		||||
        dolog ("Invalid wave format, tag is not PCM, but %d\n",
 | 
			
		||||
               wfx->wFormatTag);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!wfx->nSamplesPerSec) {
 | 
			
		||||
        dolog ("Invalid wave format, frequency is zero\n");
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    as->freq = wfx->nSamplesPerSec;
 | 
			
		||||
 | 
			
		||||
    switch (wfx->nChannels) {
 | 
			
		||||
    case 1:
 | 
			
		||||
        as->nchannels = 1;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 2:
 | 
			
		||||
        as->nchannels = 2;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog (
 | 
			
		||||
            "Invalid wave format, number of channels is not 1 or 2, but %d\n",
 | 
			
		||||
            wfx->nChannels
 | 
			
		||||
            );
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    switch (wfx->wBitsPerSample) {
 | 
			
		||||
    case 8:
 | 
			
		||||
        as->fmt = AUD_FMT_U8;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 16:
 | 
			
		||||
        as->fmt = AUD_FMT_S16;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 32:
 | 
			
		||||
        as->fmt = AUD_FMT_S32;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Invalid wave format, bits per sample is not "
 | 
			
		||||
               "8, 16 or 32, but %d\n",
 | 
			
		||||
               wfx->wBitsPerSample);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#include "dsound_template.h"
 | 
			
		||||
#define DSBTYPE_IN
 | 
			
		||||
#include "dsound_template.h"
 | 
			
		||||
@@ -565,13 +661,13 @@ static int dsound_write (SWVoiceOut *sw, void *buf, int len)
 | 
			
		||||
    return audio_pcm_sw_write (sw, buf, len);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int dsound_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int dsound_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    int err;
 | 
			
		||||
    HRESULT hr;
 | 
			
		||||
    DSoundVoiceOut *ds = (DSoundVoiceOut *) hw;
 | 
			
		||||
    LPDIRECTSOUNDBUFFER dsb = ds->dsound_buffer;
 | 
			
		||||
    int len, hwshift;
 | 
			
		||||
    int live, len, hwshift;
 | 
			
		||||
    DWORD blen1, blen2;
 | 
			
		||||
    DWORD len1, len2;
 | 
			
		||||
    DWORD decr;
 | 
			
		||||
@@ -587,6 +683,8 @@ static int dsound_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
    hwshift = hw->info.shift;
 | 
			
		||||
    bufsize = hw->samples << hwshift;
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
 | 
			
		||||
    hr = IDirectSoundBuffer_GetCurrentPosition (
 | 
			
		||||
        dsb,
 | 
			
		||||
        &ppos,
 | 
			
		||||
@@ -831,11 +929,11 @@ static int dsound_run_in (HWVoiceIn *hw)
 | 
			
		||||
    decr = len1 + len2;
 | 
			
		||||
 | 
			
		||||
    if (p1 && len1) {
 | 
			
		||||
        hw->conv (hw->conv_buf + hw->wpos, p1, len1);
 | 
			
		||||
        hw->conv (hw->conv_buf + hw->wpos, p1, len1, &nominal_volume);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (p2 && len2) {
 | 
			
		||||
        hw->conv (hw->conv_buf, p2, len2);
 | 
			
		||||
        hw->conv (hw->conv_buf, p2, len2, &nominal_volume);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    dsound_unlock_in (dscb, p1, p2, blen1, blen2);
 | 
			
		||||
@@ -938,93 +1036,54 @@ static void *dsound_audio_init (void)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option dsound_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "LOCK_RETRIES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.lock_retries,
 | 
			
		||||
        .descr = "Number of times to attempt locking the buffer"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "RESTOURE_RETRIES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.restore_retries,
 | 
			
		||||
        .descr = "Number of times to attempt restoring the buffer"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "GETSTATUS_RETRIES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.getstatus_retries,
 | 
			
		||||
        .descr = "Number of times to attempt getting status of the buffer"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SET_PRIMARY",
 | 
			
		||||
        .tag   = AUD_OPT_BOOL,
 | 
			
		||||
        .valp  = &conf.set_primary,
 | 
			
		||||
        .descr = "Set the parameters of primary buffer"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "LATENCY_MILLIS",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.latency_millis,
 | 
			
		||||
        .descr = "(undocumented)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "PRIMARY_FREQ",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.settings.freq,
 | 
			
		||||
        .descr = "Primary buffer frequency"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "PRIMARY_CHANNELS",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.settings.nchannels,
 | 
			
		||||
        .descr = "Primary buffer number of channels (1 - mono, 2 - stereo)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "PRIMARY_FMT",
 | 
			
		||||
        .tag   = AUD_OPT_FMT,
 | 
			
		||||
        .valp  = &conf.settings.fmt,
 | 
			
		||||
        .descr = "Primary buffer format"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "BUFSIZE_OUT",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.bufsize_out,
 | 
			
		||||
        .descr = "(undocumented)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "BUFSIZE_IN",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.bufsize_in,
 | 
			
		||||
        .descr = "(undocumented)"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"LOCK_RETRIES", AUD_OPT_INT, &conf.lock_retries,
 | 
			
		||||
     "Number of times to attempt locking the buffer", NULL, 0},
 | 
			
		||||
    {"RESTOURE_RETRIES", AUD_OPT_INT, &conf.restore_retries,
 | 
			
		||||
     "Number of times to attempt restoring the buffer", NULL, 0},
 | 
			
		||||
    {"GETSTATUS_RETRIES", AUD_OPT_INT, &conf.getstatus_retries,
 | 
			
		||||
     "Number of times to attempt getting status of the buffer", NULL, 0},
 | 
			
		||||
    {"SET_PRIMARY", AUD_OPT_BOOL, &conf.set_primary,
 | 
			
		||||
     "Set the parameters of primary buffer", NULL, 0},
 | 
			
		||||
    {"LATENCY_MILLIS", AUD_OPT_INT, &conf.latency_millis,
 | 
			
		||||
     "(undocumented)", NULL, 0},
 | 
			
		||||
    {"PRIMARY_FREQ", AUD_OPT_INT, &conf.settings.freq,
 | 
			
		||||
     "Primary buffer frequency", NULL, 0},
 | 
			
		||||
    {"PRIMARY_CHANNELS", AUD_OPT_INT, &conf.settings.nchannels,
 | 
			
		||||
     "Primary buffer number of channels (1 - mono, 2 - stereo)", NULL, 0},
 | 
			
		||||
    {"PRIMARY_FMT", AUD_OPT_FMT, &conf.settings.fmt,
 | 
			
		||||
     "Primary buffer format", NULL, 0},
 | 
			
		||||
    {"BUFSIZE_OUT", AUD_OPT_INT, &conf.bufsize_out,
 | 
			
		||||
     "(undocumented)", NULL, 0},
 | 
			
		||||
    {"BUFSIZE_IN", AUD_OPT_INT, &conf.bufsize_in,
 | 
			
		||||
     "(undocumented)", NULL, 0},
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops dsound_pcm_ops = {
 | 
			
		||||
    .init_out = dsound_init_out,
 | 
			
		||||
    .fini_out = dsound_fini_out,
 | 
			
		||||
    .run_out  = dsound_run_out,
 | 
			
		||||
    .write    = dsound_write,
 | 
			
		||||
    .ctl_out  = dsound_ctl_out,
 | 
			
		||||
    dsound_init_out,
 | 
			
		||||
    dsound_fini_out,
 | 
			
		||||
    dsound_run_out,
 | 
			
		||||
    dsound_write,
 | 
			
		||||
    dsound_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = dsound_init_in,
 | 
			
		||||
    .fini_in  = dsound_fini_in,
 | 
			
		||||
    .run_in   = dsound_run_in,
 | 
			
		||||
    .read     = dsound_read,
 | 
			
		||||
    .ctl_in   = dsound_ctl_in
 | 
			
		||||
    dsound_init_in,
 | 
			
		||||
    dsound_fini_in,
 | 
			
		||||
    dsound_run_in,
 | 
			
		||||
    dsound_read,
 | 
			
		||||
    dsound_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver dsound_audio_driver = {
 | 
			
		||||
    .name           = "dsound",
 | 
			
		||||
    .descr          = "DirectSound http://wikipedia.org/wiki/DirectSound",
 | 
			
		||||
    .options        = dsound_options,
 | 
			
		||||
    .init           = dsound_audio_init,
 | 
			
		||||
    .fini           = dsound_audio_fini,
 | 
			
		||||
    .pcm_ops        = &dsound_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = 1,
 | 
			
		||||
    .voice_size_out = sizeof (DSoundVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (DSoundVoiceIn)
 | 
			
		||||
    INIT_FIELD (name           = ) "dsound",
 | 
			
		||||
    INIT_FIELD (descr          = )
 | 
			
		||||
    "DirectSound http://wikipedia.org/wiki/DirectSound",
 | 
			
		||||
    INIT_FIELD (options        = ) dsound_options,
 | 
			
		||||
    INIT_FIELD (init           = ) dsound_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) dsound_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &dsound_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) 1,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (DSoundVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (DSoundVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										175
									
								
								audio/esdaudio.c
									
									
									
									
									
								
							
							
						
						
									
										175
									
								
								audio/esdaudio.c
									
									
									
									
									
								
							@@ -24,6 +24,7 @@
 | 
			
		||||
#include <esd.h>
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
#include <signal.h>
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "esd"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
@@ -57,8 +58,10 @@ static struct {
 | 
			
		||||
    char *dac_host;
 | 
			
		||||
    char *adc_host;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .samples = 1024,
 | 
			
		||||
    .divisor = 2,
 | 
			
		||||
    1024,
 | 
			
		||||
    2,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void GCC_FMT_ATTR (2, 3) qesd_logerr (int err, const char *fmt, ...)
 | 
			
		||||
@@ -130,7 +133,7 @@ static void *qesd_thread_out (void *arg)
 | 
			
		||||
                int wsamples = written >> hw->info.shift;
 | 
			
		||||
                int wbytes = wsamples << hw->info.shift;
 | 
			
		||||
                if (wbytes != written) {
 | 
			
		||||
                    dolog ("warning: Misaligned write %d (requested %zd), "
 | 
			
		||||
                    dolog ("warning: Misaligned write %d (requested %d), "
 | 
			
		||||
                           "alignment %d\n",
 | 
			
		||||
                           wbytes, written, hw->info.align + 1);
 | 
			
		||||
                }
 | 
			
		||||
@@ -157,15 +160,16 @@ static void *qesd_thread_out (void *arg)
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qesd_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int qesd_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    int decr;
 | 
			
		||||
    int live, decr;
 | 
			
		||||
    ESDVoiceOut *esd = (ESDVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_lock (&esd->pt, AUDIO_FUNC)) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
    decr = audio_MIN (live, esd->decr);
 | 
			
		||||
    esd->decr -= decr;
 | 
			
		||||
    esd->live = live - decr;
 | 
			
		||||
@@ -189,6 +193,10 @@ static int qesd_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    ESDVoiceOut *esd = (ESDVoiceOut *) hw;
 | 
			
		||||
    struct audsettings obt_as = *as;
 | 
			
		||||
    int esdfmt = ESD_STREAM | ESD_PLAY;
 | 
			
		||||
    int err;
 | 
			
		||||
    sigset_t set, old_set;
 | 
			
		||||
 | 
			
		||||
    sigfillset (&set);
 | 
			
		||||
 | 
			
		||||
    esdfmt |= (as->nchannels == 2) ? ESD_STEREO : ESD_MONO;
 | 
			
		||||
    switch (as->fmt) {
 | 
			
		||||
@@ -201,7 +209,7 @@ static int qesd_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    case AUD_FMT_S32:
 | 
			
		||||
    case AUD_FMT_U32:
 | 
			
		||||
        dolog ("Will use 16 instead of 32 bit samples\n");
 | 
			
		||||
        /* fall through */
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S16:
 | 
			
		||||
    case AUD_FMT_U16:
 | 
			
		||||
    deffmt:
 | 
			
		||||
@@ -226,27 +234,45 @@ static int qesd_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    esd->fd = esd_play_stream (esdfmt, as->freq, conf.dac_host, NULL);
 | 
			
		||||
    if (esd->fd < 0) {
 | 
			
		||||
        qesd_logerr (errno, "esd_play_stream failed\n");
 | 
			
		||||
    esd->fd = -1;
 | 
			
		||||
    err = pthread_sigmask (SIG_BLOCK, &set, &old_set);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        qesd_logerr (err, "pthread_sigmask failed\n");
 | 
			
		||||
        goto fail1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_init (&esd->pt, qesd_thread_out, esd, AUDIO_CAP, AUDIO_FUNC)) {
 | 
			
		||||
    esd->fd = esd_play_stream (esdfmt, as->freq, conf.dac_host, NULL);
 | 
			
		||||
    if (esd->fd < 0) {
 | 
			
		||||
        qesd_logerr (errno, "esd_play_stream failed\n");
 | 
			
		||||
        goto fail2;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_init (&esd->pt, qesd_thread_out, esd, AUDIO_CAP, AUDIO_FUNC)) {
 | 
			
		||||
        goto fail3;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = pthread_sigmask (SIG_SETMASK, &old_set, NULL);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        qesd_logerr (err, "pthread_sigmask(restore) failed\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 fail2:
 | 
			
		||||
 fail3:
 | 
			
		||||
    if (close (esd->fd)) {
 | 
			
		||||
        qesd_logerr (errno, "%s: close on esd socket(%d) failed\n",
 | 
			
		||||
                     AUDIO_FUNC, esd->fd);
 | 
			
		||||
    }
 | 
			
		||||
    esd->fd = -1;
 | 
			
		||||
 | 
			
		||||
 fail2:
 | 
			
		||||
    err = pthread_sigmask (SIG_SETMASK, &old_set, NULL);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        qesd_logerr (err, "pthread_sigmask(restore) failed\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 fail1:
 | 
			
		||||
    g_free (esd->pcm_buf);
 | 
			
		||||
    qemu_free (esd->pcm_buf);
 | 
			
		||||
    esd->pcm_buf = NULL;
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
@@ -270,7 +296,7 @@ static void qesd_fini_out (HWVoiceOut *hw)
 | 
			
		||||
 | 
			
		||||
    audio_pt_fini (&esd->pt, AUDIO_FUNC);
 | 
			
		||||
 | 
			
		||||
    g_free (esd->pcm_buf);
 | 
			
		||||
    qemu_free (esd->pcm_buf);
 | 
			
		||||
    esd->pcm_buf = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -337,7 +363,7 @@ static void *qesd_thread_in (void *arg)
 | 
			
		||||
                int rsamples = nread >> hw->info.shift;
 | 
			
		||||
                int rbytes = rsamples << hw->info.shift;
 | 
			
		||||
                if (rbytes != nread) {
 | 
			
		||||
                    dolog ("warning: Misaligned write %d (requested %zd), "
 | 
			
		||||
                    dolog ("warning: Misaligned write %d (requested %d), "
 | 
			
		||||
                           "alignment %d\n",
 | 
			
		||||
                           rbytes, nread, hw->info.align + 1);
 | 
			
		||||
                }
 | 
			
		||||
@@ -346,7 +372,8 @@ static void *qesd_thread_in (void *arg)
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            hw->conv (hw->conv_buf + wpos, buf, nread >> hw->info.shift);
 | 
			
		||||
            hw->conv (hw->conv_buf + wpos, buf, nread >> hw->info.shift,
 | 
			
		||||
                      &nominal_volume);
 | 
			
		||||
            wpos = (wpos + chunk) % hw->samples;
 | 
			
		||||
            to_grab -= chunk;
 | 
			
		||||
        }
 | 
			
		||||
@@ -399,6 +426,10 @@ static int qesd_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
    ESDVoiceIn *esd = (ESDVoiceIn *) hw;
 | 
			
		||||
    struct audsettings obt_as = *as;
 | 
			
		||||
    int esdfmt = ESD_STREAM | ESD_RECORD;
 | 
			
		||||
    int err;
 | 
			
		||||
    sigset_t set, old_set;
 | 
			
		||||
 | 
			
		||||
    sigfillset (&set);
 | 
			
		||||
 | 
			
		||||
    esdfmt |= (as->nchannels == 2) ? ESD_STEREO : ESD_MONO;
 | 
			
		||||
    switch (as->fmt) {
 | 
			
		||||
@@ -433,27 +464,46 @@ static int qesd_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    esd->fd = esd_record_stream (esdfmt, as->freq, conf.adc_host, NULL);
 | 
			
		||||
    if (esd->fd < 0) {
 | 
			
		||||
        qesd_logerr (errno, "esd_record_stream failed\n");
 | 
			
		||||
    esd->fd = -1;
 | 
			
		||||
 | 
			
		||||
    err = pthread_sigmask (SIG_BLOCK, &set, &old_set);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        qesd_logerr (err, "pthread_sigmask failed\n");
 | 
			
		||||
        goto fail1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_init (&esd->pt, qesd_thread_in, esd, AUDIO_CAP, AUDIO_FUNC)) {
 | 
			
		||||
    esd->fd = esd_record_stream (esdfmt, as->freq, conf.adc_host, NULL);
 | 
			
		||||
    if (esd->fd < 0) {
 | 
			
		||||
        qesd_logerr (errno, "esd_record_stream failed\n");
 | 
			
		||||
        goto fail2;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_init (&esd->pt, qesd_thread_in, esd, AUDIO_CAP, AUDIO_FUNC)) {
 | 
			
		||||
        goto fail3;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = pthread_sigmask (SIG_SETMASK, &old_set, NULL);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        qesd_logerr (err, "pthread_sigmask(restore) failed\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 fail2:
 | 
			
		||||
 fail3:
 | 
			
		||||
    if (close (esd->fd)) {
 | 
			
		||||
        qesd_logerr (errno, "%s: close on esd socket(%d) failed\n",
 | 
			
		||||
                     AUDIO_FUNC, esd->fd);
 | 
			
		||||
    }
 | 
			
		||||
    esd->fd = -1;
 | 
			
		||||
 | 
			
		||||
 fail2:
 | 
			
		||||
    err = pthread_sigmask (SIG_SETMASK, &old_set, NULL);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        qesd_logerr (err, "pthread_sigmask(restore) failed\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 fail1:
 | 
			
		||||
    g_free (esd->pcm_buf);
 | 
			
		||||
    qemu_free (esd->pcm_buf);
 | 
			
		||||
    esd->pcm_buf = NULL;
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
@@ -477,7 +527,7 @@ static void qesd_fini_in (HWVoiceIn *hw)
 | 
			
		||||
 | 
			
		||||
    audio_pt_fini (&esd->pt, AUDIO_FUNC);
 | 
			
		||||
 | 
			
		||||
    g_free (esd->pcm_buf);
 | 
			
		||||
    qemu_free (esd->pcm_buf);
 | 
			
		||||
    esd->pcm_buf = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -501,57 +551,46 @@ static void qesd_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
struct audio_option qesd_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SAMPLES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.samples,
 | 
			
		||||
        .descr = "buffer size in samples"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "DIVISOR",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.divisor,
 | 
			
		||||
        .descr = "threshold divisor"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "DAC_HOST",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &conf.dac_host,
 | 
			
		||||
        .descr = "playback host"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "ADC_HOST",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &conf.adc_host,
 | 
			
		||||
        .descr = "capture host"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"SAMPLES", AUD_OPT_INT, &conf.samples,
 | 
			
		||||
     "buffer size in samples", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"DIVISOR", AUD_OPT_INT, &conf.divisor,
 | 
			
		||||
     "threshold divisor", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"DAC_HOST", AUD_OPT_STR, &conf.dac_host,
 | 
			
		||||
     "playback host", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"ADC_HOST", AUD_OPT_STR, &conf.adc_host,
 | 
			
		||||
     "capture host", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops qesd_pcm_ops = {
 | 
			
		||||
    .init_out = qesd_init_out,
 | 
			
		||||
    .fini_out = qesd_fini_out,
 | 
			
		||||
    .run_out  = qesd_run_out,
 | 
			
		||||
    .write    = qesd_write,
 | 
			
		||||
    .ctl_out  = qesd_ctl_out,
 | 
			
		||||
    qesd_init_out,
 | 
			
		||||
    qesd_fini_out,
 | 
			
		||||
    qesd_run_out,
 | 
			
		||||
    qesd_write,
 | 
			
		||||
    qesd_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = qesd_init_in,
 | 
			
		||||
    .fini_in  = qesd_fini_in,
 | 
			
		||||
    .run_in   = qesd_run_in,
 | 
			
		||||
    .read     = qesd_read,
 | 
			
		||||
    .ctl_in   = qesd_ctl_in,
 | 
			
		||||
    qesd_init_in,
 | 
			
		||||
    qesd_fini_in,
 | 
			
		||||
    qesd_run_in,
 | 
			
		||||
    qesd_read,
 | 
			
		||||
    qesd_ctl_in,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver esd_audio_driver = {
 | 
			
		||||
    .name           = "esd",
 | 
			
		||||
    .descr          = "http://en.wikipedia.org/wiki/Esound",
 | 
			
		||||
    .options        = qesd_options,
 | 
			
		||||
    .init           = qesd_audio_init,
 | 
			
		||||
    .fini           = qesd_audio_fini,
 | 
			
		||||
    .pcm_ops        = &qesd_pcm_ops,
 | 
			
		||||
    .can_be_default = 0,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (ESDVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (ESDVoiceIn)
 | 
			
		||||
    INIT_FIELD (name           = ) "esd",
 | 
			
		||||
    INIT_FIELD (descr          = )
 | 
			
		||||
    "http://en.wikipedia.org/wiki/Esound",
 | 
			
		||||
    INIT_FIELD (options        = ) qesd_options,
 | 
			
		||||
    INIT_FIELD (init           = ) qesd_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) qesd_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &qesd_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 0,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (ESDVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (ESDVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
@@ -47,11 +47,16 @@ static struct {
 | 
			
		||||
    int freq;
 | 
			
		||||
    int nb_channels;
 | 
			
		||||
    int bufsize;
 | 
			
		||||
    int threshold;
 | 
			
		||||
    int broken_adc;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .nb_samples  = 2048 * 2,
 | 
			
		||||
    .freq        = 44100,
 | 
			
		||||
    .nb_channels = 2,
 | 
			
		||||
    NULL,
 | 
			
		||||
    2048 * 2,
 | 
			
		||||
    44100,
 | 
			
		||||
    2,
 | 
			
		||||
    0,
 | 
			
		||||
    0,
 | 
			
		||||
    0
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void GCC_FMT_ATTR (1, 2) fmod_logerr (const char *fmt, ...)
 | 
			
		||||
@@ -224,15 +229,24 @@ static int fmod_lock_sample (
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int fmod_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int fmod_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    FMODVoiceOut *fmd = (FMODVoiceOut *) hw;
 | 
			
		||||
    int decr;
 | 
			
		||||
    int live, decr;
 | 
			
		||||
    void *p1 = 0, *p2 = 0;
 | 
			
		||||
    unsigned int blen1 = 0, blen2 = 0;
 | 
			
		||||
    unsigned int len1 = 0, len2 = 0;
 | 
			
		||||
    int nb_live;
 | 
			
		||||
 | 
			
		||||
    if (!hw->pending_disable) {
 | 
			
		||||
    live = audio_pcm_hw_get_live_out2 (hw, &nb_live);
 | 
			
		||||
    if (!live) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!hw->pending_disable
 | 
			
		||||
        && nb_live
 | 
			
		||||
        && (conf.threshold && live <= conf.threshold)) {
 | 
			
		||||
        ldebug ("live=%d nb_live=%d\n", live, nb_live);
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
@@ -343,7 +357,7 @@ static void fmod_fini_out (HWVoiceOut *hw)
 | 
			
		||||
 | 
			
		||||
static int fmod_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    int mode, channel;
 | 
			
		||||
    int bits16, mode, channel;
 | 
			
		||||
    FMODVoiceOut *fmd = (FMODVoiceOut *) hw;
 | 
			
		||||
    struct audsettings obt_as = *as;
 | 
			
		||||
 | 
			
		||||
@@ -374,6 +388,7 @@ static int fmod_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    /* FMOD always operates on little endian frames? */
 | 
			
		||||
    obt_as.endianness = 0;
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &obt_as);
 | 
			
		||||
    bits16 = (mode & FSOUND_16BITS) != 0;
 | 
			
		||||
    hw->samples = conf.nb_samples;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
@@ -404,7 +419,7 @@ static int fmod_ctl_out (HWVoiceOut *hw, int cmd, ...)
 | 
			
		||||
 | 
			
		||||
static int fmod_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    int mode;
 | 
			
		||||
    int bits16, mode;
 | 
			
		||||
    FMODVoiceIn *fmd = (FMODVoiceIn *) hw;
 | 
			
		||||
    struct audsettings obt_as = *as;
 | 
			
		||||
 | 
			
		||||
@@ -431,6 +446,7 @@ static int fmod_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
    /* FMOD always operates on little endian frames? */
 | 
			
		||||
    obt_as.endianness = 0;
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &obt_as);
 | 
			
		||||
    bits16 = (mode & FSOUND_16BITS) != 0;
 | 
			
		||||
    hw->samples = conf.nb_samples;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
@@ -486,10 +502,10 @@ static int fmod_run_in (HWVoiceIn *hw)
 | 
			
		||||
    decr = len1 + len2;
 | 
			
		||||
 | 
			
		||||
    if (p1 && blen1) {
 | 
			
		||||
        hw->conv (hw->conv_buf + hw->wpos, p1, len1);
 | 
			
		||||
        hw->conv (hw->conv_buf + hw->wpos, p1, len1, &nominal_volume);
 | 
			
		||||
    }
 | 
			
		||||
    if (p2 && len2) {
 | 
			
		||||
        hw->conv (hw->conv_buf, p2, len2);
 | 
			
		||||
        hw->conv (hw->conv_buf, p2, len2, &nominal_volume);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    fmod_unlock_sample (fmd->fmod_sample, p1, p2, blen1, blen2);
 | 
			
		||||
@@ -501,27 +517,27 @@ static struct {
 | 
			
		||||
    const char *name;
 | 
			
		||||
    int type;
 | 
			
		||||
} drvtab[] = {
 | 
			
		||||
    { .name = "none",   .type = FSOUND_OUTPUT_NOSOUND },
 | 
			
		||||
    {"none", FSOUND_OUTPUT_NOSOUND},
 | 
			
		||||
#ifdef _WIN32
 | 
			
		||||
    { .name = "winmm",  .type = FSOUND_OUTPUT_WINMM   },
 | 
			
		||||
    { .name = "dsound", .type = FSOUND_OUTPUT_DSOUND  },
 | 
			
		||||
    { .name = "a3d",    .type = FSOUND_OUTPUT_A3D     },
 | 
			
		||||
    { .name = "asio",   .type = FSOUND_OUTPUT_ASIO    },
 | 
			
		||||
    {"winmm", FSOUND_OUTPUT_WINMM},
 | 
			
		||||
    {"dsound", FSOUND_OUTPUT_DSOUND},
 | 
			
		||||
    {"a3d", FSOUND_OUTPUT_A3D},
 | 
			
		||||
    {"asio", FSOUND_OUTPUT_ASIO},
 | 
			
		||||
#endif
 | 
			
		||||
#ifdef __linux__
 | 
			
		||||
    { .name = "oss",    .type = FSOUND_OUTPUT_OSS     },
 | 
			
		||||
    { .name = "alsa",   .type = FSOUND_OUTPUT_ALSA    },
 | 
			
		||||
    { .name = "esd",    .type = FSOUND_OUTPUT_ESD     },
 | 
			
		||||
    {"oss", FSOUND_OUTPUT_OSS},
 | 
			
		||||
    {"alsa", FSOUND_OUTPUT_ALSA},
 | 
			
		||||
    {"esd", FSOUND_OUTPUT_ESD},
 | 
			
		||||
#endif
 | 
			
		||||
#ifdef __APPLE__
 | 
			
		||||
    { .name = "mac",    .type = FSOUND_OUTPUT_MAC     },
 | 
			
		||||
    {"mac", FSOUND_OUTPUT_MAC},
 | 
			
		||||
#endif
 | 
			
		||||
#if 0
 | 
			
		||||
    { .name = "xbox",   .type = FSOUND_OUTPUT_XBOX    },
 | 
			
		||||
    { .name = "ps2",    .type = FSOUND_OUTPUT_PS2     },
 | 
			
		||||
    { .name = "gcube",  .type = FSOUND_OUTPUT_GC      },
 | 
			
		||||
    {"xbox", FSOUND_OUTPUT_XBOX},
 | 
			
		||||
    {"ps2", FSOUND_OUTPUT_PS2},
 | 
			
		||||
    {"gcube", FSOUND_OUTPUT_GC},
 | 
			
		||||
#endif
 | 
			
		||||
    { .name = "none-realtime", .type = FSOUND_OUTPUT_NOSOUND_NONREALTIME }
 | 
			
		||||
    {"none-realtime", FSOUND_OUTPUT_NOSOUND_NONREALTIME}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void *fmod_audio_init (void)
 | 
			
		||||
@@ -623,63 +639,48 @@ static void fmod_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option fmod_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "DRV",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &conf.drvname,
 | 
			
		||||
        .descr = "FMOD driver"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "FREQ",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.freq,
 | 
			
		||||
        .descr = "Default frequency"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SAMPLES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.nb_samples,
 | 
			
		||||
        .descr = "Buffer size in samples"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "CHANNELS",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.nb_channels,
 | 
			
		||||
        .descr = "Number of default channels (1 - mono, 2 - stereo)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "BUFSIZE",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.bufsize,
 | 
			
		||||
        .descr = "(undocumented)"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"DRV", AUD_OPT_STR, &conf.drvname,
 | 
			
		||||
     "FMOD driver", NULL, 0},
 | 
			
		||||
    {"FREQ", AUD_OPT_INT, &conf.freq,
 | 
			
		||||
     "Default frequency", NULL, 0},
 | 
			
		||||
    {"SAMPLES", AUD_OPT_INT, &conf.nb_samples,
 | 
			
		||||
     "Buffer size in samples", NULL, 0},
 | 
			
		||||
    {"CHANNELS", AUD_OPT_INT, &conf.nb_channels,
 | 
			
		||||
     "Number of default channels (1 - mono, 2 - stereo)", NULL, 0},
 | 
			
		||||
    {"BUFSIZE", AUD_OPT_INT, &conf.bufsize,
 | 
			
		||||
     "(undocumented)", NULL, 0},
 | 
			
		||||
#if 0
 | 
			
		||||
    {"THRESHOLD", AUD_OPT_INT, &conf.threshold,
 | 
			
		||||
     "(undocumented)"},
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops fmod_pcm_ops = {
 | 
			
		||||
    .init_out = fmod_init_out,
 | 
			
		||||
    .fini_out = fmod_fini_out,
 | 
			
		||||
    .run_out  = fmod_run_out,
 | 
			
		||||
    .write    = fmod_write,
 | 
			
		||||
    .ctl_out  = fmod_ctl_out,
 | 
			
		||||
    fmod_init_out,
 | 
			
		||||
    fmod_fini_out,
 | 
			
		||||
    fmod_run_out,
 | 
			
		||||
    fmod_write,
 | 
			
		||||
    fmod_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = fmod_init_in,
 | 
			
		||||
    .fini_in  = fmod_fini_in,
 | 
			
		||||
    .run_in   = fmod_run_in,
 | 
			
		||||
    .read     = fmod_read,
 | 
			
		||||
    .ctl_in   = fmod_ctl_in
 | 
			
		||||
    fmod_init_in,
 | 
			
		||||
    fmod_fini_in,
 | 
			
		||||
    fmod_run_in,
 | 
			
		||||
    fmod_read,
 | 
			
		||||
    fmod_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver fmod_audio_driver = {
 | 
			
		||||
    .name           = "fmod",
 | 
			
		||||
    .descr          = "FMOD 3.xx http://www.fmod.org",
 | 
			
		||||
    .options        = fmod_options,
 | 
			
		||||
    .init           = fmod_audio_init,
 | 
			
		||||
    .fini           = fmod_audio_fini,
 | 
			
		||||
    .pcm_ops        = &fmod_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (FMODVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (FMODVoiceIn)
 | 
			
		||||
    INIT_FIELD (name           = ) "fmod",
 | 
			
		||||
    INIT_FIELD (descr          = ) "FMOD 3.xx http://www.fmod.org",
 | 
			
		||||
    INIT_FIELD (options        = ) fmod_options,
 | 
			
		||||
    INIT_FIELD (init           = ) fmod_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) fmod_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &fmod_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (FMODVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (FMODVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
@@ -33,8 +33,7 @@
 | 
			
		||||
#define ENDIAN_CONVERT(v) (v)
 | 
			
		||||
 | 
			
		||||
/* Signed 8 bit */
 | 
			
		||||
#define BSIZE 8
 | 
			
		||||
#define ITYPE int
 | 
			
		||||
#define IN_T int8_t
 | 
			
		||||
#define IN_MIN SCHAR_MIN
 | 
			
		||||
#define IN_MAX SCHAR_MAX
 | 
			
		||||
#define SIGNED
 | 
			
		||||
@@ -43,29 +42,25 @@
 | 
			
		||||
#undef SIGNED
 | 
			
		||||
#undef IN_MAX
 | 
			
		||||
#undef IN_MIN
 | 
			
		||||
#undef BSIZE
 | 
			
		||||
#undef ITYPE
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef SHIFT
 | 
			
		||||
 | 
			
		||||
/* Unsigned 8 bit */
 | 
			
		||||
#define BSIZE 8
 | 
			
		||||
#define ITYPE uint
 | 
			
		||||
#define IN_T uint8_t
 | 
			
		||||
#define IN_MIN 0
 | 
			
		||||
#define IN_MAX UCHAR_MAX
 | 
			
		||||
#define SHIFT 8
 | 
			
		||||
#include "mixeng_template.h"
 | 
			
		||||
#undef IN_MAX
 | 
			
		||||
#undef IN_MIN
 | 
			
		||||
#undef BSIZE
 | 
			
		||||
#undef ITYPE
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef SHIFT
 | 
			
		||||
 | 
			
		||||
#undef ENDIAN_CONVERT
 | 
			
		||||
#undef ENDIAN_CONVERSION
 | 
			
		||||
 | 
			
		||||
/* Signed 16 bit */
 | 
			
		||||
#define BSIZE 16
 | 
			
		||||
#define ITYPE int
 | 
			
		||||
#define IN_T int16_t
 | 
			
		||||
#define IN_MIN SHRT_MIN
 | 
			
		||||
#define IN_MAX SHRT_MAX
 | 
			
		||||
#define SIGNED
 | 
			
		||||
@@ -83,13 +78,11 @@
 | 
			
		||||
#undef SIGNED
 | 
			
		||||
#undef IN_MAX
 | 
			
		||||
#undef IN_MIN
 | 
			
		||||
#undef BSIZE
 | 
			
		||||
#undef ITYPE
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef SHIFT
 | 
			
		||||
 | 
			
		||||
/* Unsigned 16 bit */
 | 
			
		||||
#define BSIZE 16
 | 
			
		||||
#define ITYPE uint
 | 
			
		||||
#define IN_T uint16_t
 | 
			
		||||
#define IN_MIN 0
 | 
			
		||||
#define IN_MAX USHRT_MAX
 | 
			
		||||
#define SHIFT 16
 | 
			
		||||
@@ -105,13 +98,11 @@
 | 
			
		||||
#undef ENDIAN_CONVERSION
 | 
			
		||||
#undef IN_MAX
 | 
			
		||||
#undef IN_MIN
 | 
			
		||||
#undef BSIZE
 | 
			
		||||
#undef ITYPE
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef SHIFT
 | 
			
		||||
 | 
			
		||||
/* Signed 32 bit */
 | 
			
		||||
#define BSIZE 32
 | 
			
		||||
#define ITYPE int
 | 
			
		||||
#define IN_T int32_t
 | 
			
		||||
#define IN_MIN INT32_MIN
 | 
			
		||||
#define IN_MAX INT32_MAX
 | 
			
		||||
#define SIGNED
 | 
			
		||||
@@ -129,13 +120,11 @@
 | 
			
		||||
#undef SIGNED
 | 
			
		||||
#undef IN_MAX
 | 
			
		||||
#undef IN_MIN
 | 
			
		||||
#undef BSIZE
 | 
			
		||||
#undef ITYPE
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef SHIFT
 | 
			
		||||
 | 
			
		||||
/* Unsigned 32 bit */
 | 
			
		||||
#define BSIZE 32
 | 
			
		||||
#define ITYPE uint
 | 
			
		||||
/* Unsigned 16 bit */
 | 
			
		||||
#define IN_T uint32_t
 | 
			
		||||
#define IN_MIN 0
 | 
			
		||||
#define IN_MAX UINT32_MAX
 | 
			
		||||
#define SHIFT 32
 | 
			
		||||
@@ -151,8 +140,7 @@
 | 
			
		||||
#undef ENDIAN_CONVERSION
 | 
			
		||||
#undef IN_MAX
 | 
			
		||||
#undef IN_MIN
 | 
			
		||||
#undef BSIZE
 | 
			
		||||
#undef ITYPE
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef SHIFT
 | 
			
		||||
 | 
			
		||||
t_sample *mixeng_conv[2][2][2][3] = {
 | 
			
		||||
@@ -338,29 +326,10 @@ void *st_rate_start (int inrate, int outrate)
 | 
			
		||||
 | 
			
		||||
void st_rate_stop (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    g_free (opaque);
 | 
			
		||||
    qemu_free (opaque);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void mixeng_clear (struct st_sample *buf, int len)
 | 
			
		||||
{
 | 
			
		||||
    memset (buf, 0, len * sizeof (struct st_sample));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void mixeng_volume (struct st_sample *buf, int len, struct mixeng_volume *vol)
 | 
			
		||||
{
 | 
			
		||||
    if (vol->mute) {
 | 
			
		||||
        mixeng_clear (buf, len);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (len--) {
 | 
			
		||||
#ifdef FLOAT_MIXENG
 | 
			
		||||
        buf->l = buf->l * vol->l;
 | 
			
		||||
        buf->r = buf->r * vol->r;
 | 
			
		||||
#else
 | 
			
		||||
        buf->l = (buf->l * vol->l) >> 32;
 | 
			
		||||
        buf->r = (buf->r * vol->r) >> 32;
 | 
			
		||||
#endif
 | 
			
		||||
        buf += 1;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 
 | 
			
		||||
@@ -27,13 +27,14 @@
 | 
			
		||||
#ifdef FLOAT_MIXENG
 | 
			
		||||
typedef float mixeng_real;
 | 
			
		||||
struct mixeng_volume { int mute; mixeng_real r; mixeng_real l; };
 | 
			
		||||
struct st_sample { mixeng_real l; mixeng_real r; };
 | 
			
		||||
struct mixeng_sample { mixeng_real l; mixeng_real r; };
 | 
			
		||||
#else
 | 
			
		||||
struct mixeng_volume { int mute; int64_t r; int64_t l; };
 | 
			
		||||
struct st_sample { int64_t l; int64_t r; };
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
typedef void (t_sample) (struct st_sample *dst, const void *src, int samples);
 | 
			
		||||
typedef void (t_sample) (struct st_sample *dst, const void *src,
 | 
			
		||||
                         int samples, struct mixeng_volume *vol);
 | 
			
		||||
typedef void (f_sample) (void *dst, const struct st_sample *src, int samples);
 | 
			
		||||
 | 
			
		||||
extern t_sample *mixeng_conv[2][2][2][3];
 | 
			
		||||
@@ -46,6 +47,5 @@ void st_rate_flow_mix (void *opaque, struct st_sample *ibuf, struct st_sample *o
 | 
			
		||||
                       int *isamp, int *osamp);
 | 
			
		||||
void st_rate_stop (void *opaque);
 | 
			
		||||
void mixeng_clear (struct st_sample *buf, int len);
 | 
			
		||||
void mixeng_volume (struct st_sample *buf, int len, struct mixeng_volume *vol);
 | 
			
		||||
 | 
			
		||||
#endif  /* mixeng.h */
 | 
			
		||||
 
 | 
			
		||||
@@ -31,11 +31,20 @@
 | 
			
		||||
#define HALF (IN_MAX >> 1)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define ET glue (ENDIAN_CONVERSION, glue (glue (glue (_, ITYPE), BSIZE), _t))
 | 
			
		||||
#define IN_T glue (glue (ITYPE, BSIZE), _t)
 | 
			
		||||
#ifdef CONFIG_MIXEMU
 | 
			
		||||
#ifdef FLOAT_MIXENG
 | 
			
		||||
#define VOL(a, b) ((a) * (b))
 | 
			
		||||
#else
 | 
			
		||||
#define VOL(a, b) ((a) * (b)) >> 32
 | 
			
		||||
#endif
 | 
			
		||||
#else
 | 
			
		||||
#define VOL(a, b) a
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define ET glue (ENDIAN_CONVERSION, glue (_, IN_T))
 | 
			
		||||
 | 
			
		||||
#ifdef FLOAT_MIXENG
 | 
			
		||||
static inline mixeng_real glue (conv_, ET) (IN_T v)
 | 
			
		||||
static mixeng_real inline glue (conv_, ET) (IN_T v)
 | 
			
		||||
{
 | 
			
		||||
    IN_T nv = ENDIAN_CONVERT (v);
 | 
			
		||||
 | 
			
		||||
@@ -47,14 +56,14 @@ static inline mixeng_real glue (conv_, ET) (IN_T v)
 | 
			
		||||
#endif
 | 
			
		||||
#else  /* !RECIPROCAL */
 | 
			
		||||
#ifdef SIGNED
 | 
			
		||||
    return nv / (mixeng_real) ((mixeng_real) IN_MAX - IN_MIN);
 | 
			
		||||
    return nv / (mixeng_real) (IN_MAX - IN_MIN);
 | 
			
		||||
#else
 | 
			
		||||
    return (nv - HALF) / (mixeng_real) IN_MAX;
 | 
			
		||||
#endif
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline IN_T glue (clip_, ET) (mixeng_real v)
 | 
			
		||||
static IN_T inline glue (clip_, ET) (mixeng_real v)
 | 
			
		||||
{
 | 
			
		||||
    if (v >= 0.5) {
 | 
			
		||||
        return IN_MAX;
 | 
			
		||||
@@ -64,7 +73,7 @@ static inline IN_T glue (clip_, ET) (mixeng_real v)
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
#ifdef SIGNED
 | 
			
		||||
    return ENDIAN_CONVERT ((IN_T) (v * ((mixeng_real) IN_MAX - IN_MIN)));
 | 
			
		||||
    return ENDIAN_CONVERT ((IN_T) (v * (IN_MAX - IN_MIN)));
 | 
			
		||||
#else
 | 
			
		||||
    return ENDIAN_CONVERT ((IN_T) ((v * IN_MAX) + HALF));
 | 
			
		||||
#endif
 | 
			
		||||
@@ -100,26 +109,40 @@ static inline IN_T glue (clip_, ET) (int64_t v)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static void glue (glue (conv_, ET), _to_stereo)
 | 
			
		||||
    (struct st_sample *dst, const void *src, int samples)
 | 
			
		||||
    (struct st_sample *dst, const void *src, int samples, struct mixeng_volume *vol)
 | 
			
		||||
{
 | 
			
		||||
    struct st_sample *out = dst;
 | 
			
		||||
    IN_T *in = (IN_T *) src;
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_MIXEMU
 | 
			
		||||
    if (vol->mute) {
 | 
			
		||||
        mixeng_clear (dst, samples);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
#else
 | 
			
		||||
    (void) vol;
 | 
			
		||||
#endif
 | 
			
		||||
    while (samples--) {
 | 
			
		||||
        out->l = glue (conv_, ET) (*in++);
 | 
			
		||||
        out->r = glue (conv_, ET) (*in++);
 | 
			
		||||
        out->l = VOL (glue (conv_, ET) (*in++), vol->l);
 | 
			
		||||
        out->r = VOL (glue (conv_, ET) (*in++), vol->r);
 | 
			
		||||
        out += 1;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void glue (glue (conv_, ET), _to_mono)
 | 
			
		||||
    (struct st_sample *dst, const void *src, int samples)
 | 
			
		||||
    (struct st_sample *dst, const void *src, int samples, struct mixeng_volume *vol)
 | 
			
		||||
{
 | 
			
		||||
    struct st_sample *out = dst;
 | 
			
		||||
    IN_T *in = (IN_T *) src;
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_MIXEMU
 | 
			
		||||
    if (vol->mute) {
 | 
			
		||||
        mixeng_clear (dst, samples);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
#else
 | 
			
		||||
    (void) vol;
 | 
			
		||||
#endif
 | 
			
		||||
    while (samples--) {
 | 
			
		||||
        out->l = glue (conv_, ET) (in[0]);
 | 
			
		||||
        out->l = VOL (glue (conv_, ET) (in[0]), vol->l);
 | 
			
		||||
        out->r = out->l;
 | 
			
		||||
        out += 1;
 | 
			
		||||
        in += 1;
 | 
			
		||||
@@ -151,4 +174,4 @@ static void glue (glue (clip_, ET), _from_mono)
 | 
			
		||||
 | 
			
		||||
#undef ET
 | 
			
		||||
#undef HALF
 | 
			
		||||
#undef IN_T
 | 
			
		||||
#undef VOL
 | 
			
		||||
 
 | 
			
		||||
@@ -23,7 +23,7 @@
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
#include "qemu/timer.h"
 | 
			
		||||
#include "qemu-timer.h"
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "noaudio"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
@@ -38,17 +38,22 @@ typedef struct NoVoiceIn {
 | 
			
		||||
    int64_t old_ticks;
 | 
			
		||||
} NoVoiceIn;
 | 
			
		||||
 | 
			
		||||
static int no_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int no_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    NoVoiceOut *no = (NoVoiceOut *) hw;
 | 
			
		||||
    int decr, samples;
 | 
			
		||||
    int live, decr, samples;
 | 
			
		||||
    int64_t now;
 | 
			
		||||
    int64_t ticks;
 | 
			
		||||
    int64_t bytes;
 | 
			
		||||
 | 
			
		||||
    now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (&no->hw);
 | 
			
		||||
    if (!live) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    now = qemu_get_clock (vm_clock);
 | 
			
		||||
    ticks = now - no->old_ticks;
 | 
			
		||||
    bytes = muldiv64 (ticks, hw->info.bytes_per_second, get_ticks_per_sec ());
 | 
			
		||||
    bytes = (ticks * hw->info.bytes_per_second) / ticks_per_sec;
 | 
			
		||||
    bytes = audio_MIN (bytes, INT_MAX);
 | 
			
		||||
    samples = bytes >> hw->info.shift;
 | 
			
		||||
 | 
			
		||||
@@ -102,10 +107,9 @@ static int no_run_in (HWVoiceIn *hw)
 | 
			
		||||
    int samples = 0;
 | 
			
		||||
 | 
			
		||||
    if (dead) {
 | 
			
		||||
        int64_t now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 | 
			
		||||
        int64_t now = qemu_get_clock (vm_clock);
 | 
			
		||||
        int64_t ticks = now - no->old_ticks;
 | 
			
		||||
        int64_t bytes =
 | 
			
		||||
            muldiv64 (ticks, hw->info.bytes_per_second, get_ticks_per_sec ());
 | 
			
		||||
        int64_t bytes = (ticks * hw->info.bytes_per_second) / ticks_per_sec;
 | 
			
		||||
 | 
			
		||||
        no->old_ticks = now;
 | 
			
		||||
        bytes = audio_MIN (bytes, INT_MAX);
 | 
			
		||||
@@ -117,14 +121,11 @@ static int no_run_in (HWVoiceIn *hw)
 | 
			
		||||
 | 
			
		||||
static int no_read (SWVoiceIn *sw, void *buf, int size)
 | 
			
		||||
{
 | 
			
		||||
    /* use custom code here instead of audio_pcm_sw_read() to avoid
 | 
			
		||||
     * useless resampling/mixing */
 | 
			
		||||
    int samples = size >> sw->info.shift;
 | 
			
		||||
    int total = sw->hw->total_samples_captured - sw->total_hw_samples_acquired;
 | 
			
		||||
    int to_clear = audio_MIN (samples, total);
 | 
			
		||||
    sw->total_hw_samples_acquired += total;
 | 
			
		||||
    audio_pcm_info_clear_buf (&sw->info, buf, to_clear);
 | 
			
		||||
    return to_clear << sw->info.shift;
 | 
			
		||||
    return to_clear;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int no_ctl_in (HWVoiceIn *hw, int cmd, ...)
 | 
			
		||||
@@ -145,29 +146,29 @@ static void no_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops no_pcm_ops = {
 | 
			
		||||
    .init_out = no_init_out,
 | 
			
		||||
    .fini_out = no_fini_out,
 | 
			
		||||
    .run_out  = no_run_out,
 | 
			
		||||
    .write    = no_write,
 | 
			
		||||
    .ctl_out  = no_ctl_out,
 | 
			
		||||
    no_init_out,
 | 
			
		||||
    no_fini_out,
 | 
			
		||||
    no_run_out,
 | 
			
		||||
    no_write,
 | 
			
		||||
    no_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = no_init_in,
 | 
			
		||||
    .fini_in  = no_fini_in,
 | 
			
		||||
    .run_in   = no_run_in,
 | 
			
		||||
    .read     = no_read,
 | 
			
		||||
    .ctl_in   = no_ctl_in
 | 
			
		||||
    no_init_in,
 | 
			
		||||
    no_fini_in,
 | 
			
		||||
    no_run_in,
 | 
			
		||||
    no_read,
 | 
			
		||||
    no_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver no_audio_driver = {
 | 
			
		||||
    .name           = "none",
 | 
			
		||||
    .descr          = "Timer based audio emulation",
 | 
			
		||||
    .options        = NULL,
 | 
			
		||||
    .init           = no_audio_init,
 | 
			
		||||
    .fini           = no_audio_fini,
 | 
			
		||||
    .pcm_ops        = &no_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (NoVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (NoVoiceIn)
 | 
			
		||||
    INIT_FIELD (name           = ) "none",
 | 
			
		||||
    INIT_FIELD (descr          = ) "Timer based audio emulation",
 | 
			
		||||
    INIT_FIELD (options        = ) NULL,
 | 
			
		||||
    INIT_FIELD (init           = ) no_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) no_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &no_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (NoVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (NoVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										468
									
								
								audio/ossaudio.c
									
									
									
									
									
								
							
							
						
						
									
										468
									
								
								audio/ossaudio.c
									
									
									
									
									
								
							@@ -25,28 +25,25 @@
 | 
			
		||||
#include <sys/mman.h>
 | 
			
		||||
#include <sys/types.h>
 | 
			
		||||
#include <sys/ioctl.h>
 | 
			
		||||
#ifdef __OpenBSD__
 | 
			
		||||
#include <soundcard.h>
 | 
			
		||||
#else
 | 
			
		||||
#include <sys/soundcard.h>
 | 
			
		||||
#endif
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "qemu/main-loop.h"
 | 
			
		||||
#include "qemu/host-utils.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "oss"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
 | 
			
		||||
#if defined OSS_GETVERSION && defined SNDCTL_DSP_POLICY
 | 
			
		||||
#define USE_DSP_POLICY
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
typedef struct OSSVoiceOut {
 | 
			
		||||
    HWVoiceOut hw;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    int fd;
 | 
			
		||||
    int wpos;
 | 
			
		||||
    int nfrags;
 | 
			
		||||
    int fragsize;
 | 
			
		||||
    int mmapped;
 | 
			
		||||
    int pending;
 | 
			
		||||
    int old_optr;
 | 
			
		||||
} OSSVoiceOut;
 | 
			
		||||
 | 
			
		||||
typedef struct OSSVoiceIn {
 | 
			
		||||
@@ -55,6 +52,7 @@ typedef struct OSSVoiceIn {
 | 
			
		||||
    int fd;
 | 
			
		||||
    int nfrags;
 | 
			
		||||
    int fragsize;
 | 
			
		||||
    int old_optr;
 | 
			
		||||
} OSSVoiceIn;
 | 
			
		||||
 | 
			
		||||
static struct {
 | 
			
		||||
@@ -64,17 +62,13 @@ static struct {
 | 
			
		||||
    const char *devpath_out;
 | 
			
		||||
    const char *devpath_in;
 | 
			
		||||
    int debug;
 | 
			
		||||
    int exclusive;
 | 
			
		||||
    int policy;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .try_mmap = 0,
 | 
			
		||||
    .nfrags = 4,
 | 
			
		||||
    .fragsize = 4096,
 | 
			
		||||
    .devpath_out = "/dev/dsp",
 | 
			
		||||
    .devpath_in = "/dev/dsp",
 | 
			
		||||
    .debug = 0,
 | 
			
		||||
    .exclusive = 0,
 | 
			
		||||
    .policy = 5
 | 
			
		||||
    .debug = 0
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct oss_params {
 | 
			
		||||
@@ -116,48 +110,19 @@ static void GCC_FMT_ATTR (3, 4) oss_logerr2 (
 | 
			
		||||
 | 
			
		||||
static void oss_anal_close (int *fdp)
 | 
			
		||||
{
 | 
			
		||||
    int err;
 | 
			
		||||
 | 
			
		||||
    qemu_set_fd_handler (*fdp, NULL, NULL, NULL);
 | 
			
		||||
    err = close (*fdp);
 | 
			
		||||
    int err = close (*fdp);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        oss_logerr (errno, "Failed to close file(fd=%d)\n", *fdp);
 | 
			
		||||
    }
 | 
			
		||||
    *fdp = -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void oss_helper_poll_out (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    (void) opaque;
 | 
			
		||||
    audio_run ("oss_poll_out");
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void oss_helper_poll_in (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    (void) opaque;
 | 
			
		||||
    audio_run ("oss_poll_in");
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int oss_poll_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    OSSVoiceOut *oss = (OSSVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    return qemu_set_fd_handler (oss->fd, NULL, oss_helper_poll_out, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int oss_poll_in (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    OSSVoiceIn *oss = (OSSVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    return qemu_set_fd_handler (oss->fd, oss_helper_poll_in, NULL, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int oss_write (SWVoiceOut *sw, void *buf, int len)
 | 
			
		||||
{
 | 
			
		||||
    return audio_pcm_sw_write (sw, buf, len);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int aud_to_ossfmt (audfmt_e fmt, int endianness)
 | 
			
		||||
static int aud_to_ossfmt (audfmt_e fmt)
 | 
			
		||||
{
 | 
			
		||||
    switch (fmt) {
 | 
			
		||||
    case AUD_FMT_S8:
 | 
			
		||||
@@ -167,20 +132,10 @@ static int aud_to_ossfmt (audfmt_e fmt, int endianness)
 | 
			
		||||
        return AFMT_U8;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S16:
 | 
			
		||||
        if (endianness) {
 | 
			
		||||
            return AFMT_S16_BE;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            return AFMT_S16_LE;
 | 
			
		||||
        }
 | 
			
		||||
        return AFMT_S16_LE;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_U16:
 | 
			
		||||
        if (endianness) {
 | 
			
		||||
            return AFMT_U16_BE;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            return AFMT_U16_LE;
 | 
			
		||||
        }
 | 
			
		||||
        return AFMT_U16_LE;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Internal logic error: Bad audio format %d\n", fmt);
 | 
			
		||||
@@ -246,46 +201,17 @@ static void oss_dump_info (struct oss_params *req, struct oss_params *obt)
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#ifdef USE_DSP_POLICY
 | 
			
		||||
static int oss_get_version (int fd, int *version, const char *typ)
 | 
			
		||||
{
 | 
			
		||||
    if (ioctl (fd, OSS_GETVERSION, &version)) {
 | 
			
		||||
#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
 | 
			
		||||
        /*
 | 
			
		||||
         * Looks like atm (20100109) FreeBSD knows OSS_GETVERSION
 | 
			
		||||
         * since 7.x, but currently only on the mixer device (or in
 | 
			
		||||
         * the Linuxolator), and in the native version that part of
 | 
			
		||||
         * the code is in fact never reached so the ioctl fails anyway.
 | 
			
		||||
         * Until this is fixed, just check the errno and if its what
 | 
			
		||||
         * FreeBSD's sound drivers return atm assume they are new enough.
 | 
			
		||||
         */
 | 
			
		||||
        if (errno == EINVAL) {
 | 
			
		||||
            *version = 0x040000;
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
#endif
 | 
			
		||||
        oss_logerr2 (errno, typ, "Failed to get OSS version\n");
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static int oss_open (int in, struct oss_params *req,
 | 
			
		||||
                     struct oss_params *obt, int *pfd)
 | 
			
		||||
{
 | 
			
		||||
    int fd;
 | 
			
		||||
    int oflags = conf.exclusive ? O_EXCL : 0;
 | 
			
		||||
    int mmmmssss;
 | 
			
		||||
    audio_buf_info abinfo;
 | 
			
		||||
    int fmt, freq, nchannels;
 | 
			
		||||
    int setfragment = 1;
 | 
			
		||||
    const char *dspname = in ? conf.devpath_in : conf.devpath_out;
 | 
			
		||||
    const char *typ = in ? "ADC" : "DAC";
 | 
			
		||||
 | 
			
		||||
    /* Kludge needed to have working mmap on Linux */
 | 
			
		||||
    oflags |= conf.try_mmap ? O_RDWR : (in ? O_RDONLY : O_WRONLY);
 | 
			
		||||
 | 
			
		||||
    fd = open (dspname, oflags | O_NONBLOCK);
 | 
			
		||||
    fd = open (dspname, (in ? O_RDONLY : O_WRONLY) | O_NONBLOCK);
 | 
			
		||||
    if (-1 == fd) {
 | 
			
		||||
        oss_logerr2 (errno, typ, "Failed to open `%s'\n", dspname);
 | 
			
		||||
        return -1;
 | 
			
		||||
@@ -316,36 +242,11 @@ static int oss_open (int in, struct oss_params *req,
 | 
			
		||||
        goto err;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
#ifdef USE_DSP_POLICY
 | 
			
		||||
    if (conf.policy >= 0) {
 | 
			
		||||
        int version;
 | 
			
		||||
 | 
			
		||||
        if (!oss_get_version (fd, &version, typ)) {
 | 
			
		||||
            if (conf.debug) {
 | 
			
		||||
                dolog ("OSS version = %#x\n", version);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (version >= 0x040000) {
 | 
			
		||||
                int policy = conf.policy;
 | 
			
		||||
                if (ioctl (fd, SNDCTL_DSP_POLICY, &policy)) {
 | 
			
		||||
                    oss_logerr2 (errno, typ,
 | 
			
		||||
                                 "Failed to set timing policy to %d\n",
 | 
			
		||||
                                 conf.policy);
 | 
			
		||||
                    goto err;
 | 
			
		||||
                }
 | 
			
		||||
                setfragment = 0;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    if (setfragment) {
 | 
			
		||||
        int mmmmssss = (req->nfrags << 16) | ctz32 (req->fragsize);
 | 
			
		||||
        if (ioctl (fd, SNDCTL_DSP_SETFRAGMENT, &mmmmssss)) {
 | 
			
		||||
            oss_logerr2 (errno, typ, "Failed to set buffer length (%d, %d)\n",
 | 
			
		||||
                         req->nfrags, req->fragsize);
 | 
			
		||||
            goto err;
 | 
			
		||||
        }
 | 
			
		||||
    mmmmssss = (req->nfrags << 16) | lsbindex (req->fragsize);
 | 
			
		||||
    if (ioctl (fd, SNDCTL_DSP_SETFRAGMENT, &mmmmssss)) {
 | 
			
		||||
        oss_logerr2 (errno, typ, "Failed to set buffer length (%d, %d)\n",
 | 
			
		||||
                     req->nfrags, req->fragsize);
 | 
			
		||||
        goto err;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (ioctl (fd, in ? SNDCTL_DSP_GETISPACE : SNDCTL_DSP_GETOSPACE, &abinfo)) {
 | 
			
		||||
@@ -387,58 +288,26 @@ static int oss_open (int in, struct oss_params *req,
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void oss_write_pending (OSSVoiceOut *oss)
 | 
			
		||||
{
 | 
			
		||||
    HWVoiceOut *hw = &oss->hw;
 | 
			
		||||
 | 
			
		||||
    if (oss->mmapped) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (oss->pending) {
 | 
			
		||||
        int samples_written;
 | 
			
		||||
        ssize_t bytes_written;
 | 
			
		||||
        int samples_till_end = hw->samples - oss->wpos;
 | 
			
		||||
        int samples_to_write = audio_MIN (oss->pending, samples_till_end);
 | 
			
		||||
        int bytes_to_write = samples_to_write << hw->info.shift;
 | 
			
		||||
        void *pcm = advance (oss->pcm_buf, oss->wpos << hw->info.shift);
 | 
			
		||||
 | 
			
		||||
        bytes_written = write (oss->fd, pcm, bytes_to_write);
 | 
			
		||||
        if (bytes_written < 0) {
 | 
			
		||||
            if (errno != EAGAIN) {
 | 
			
		||||
                oss_logerr (errno, "failed to write %d bytes\n",
 | 
			
		||||
                            bytes_to_write);
 | 
			
		||||
            }
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (bytes_written & hw->info.align) {
 | 
			
		||||
            dolog ("misaligned write asked for %d, but got %zd\n",
 | 
			
		||||
                   bytes_to_write, bytes_written);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        samples_written = bytes_written >> hw->info.shift;
 | 
			
		||||
        oss->pending -= samples_written;
 | 
			
		||||
        oss->wpos = (oss->wpos + samples_written) % hw->samples;
 | 
			
		||||
        if (bytes_written - bytes_to_write) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int oss_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int oss_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    OSSVoiceOut *oss = (OSSVoiceOut *) hw;
 | 
			
		||||
    int err, decr;
 | 
			
		||||
    int err, rpos, live, decr;
 | 
			
		||||
    int samples;
 | 
			
		||||
    uint8_t *dst;
 | 
			
		||||
    struct st_sample *src;
 | 
			
		||||
    struct audio_buf_info abinfo;
 | 
			
		||||
    struct count_info cntinfo;
 | 
			
		||||
    int bufsize;
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
    if (!live) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bufsize = hw->samples << hw->info.shift;
 | 
			
		||||
 | 
			
		||||
    if (oss->mmapped) {
 | 
			
		||||
        int bytes, pos;
 | 
			
		||||
        int bytes;
 | 
			
		||||
 | 
			
		||||
        err = ioctl (oss->fd, SNDCTL_DSP_GETOPTR, &cntinfo);
 | 
			
		||||
        if (err < 0) {
 | 
			
		||||
@@ -446,8 +315,20 @@ static int oss_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        pos = hw->rpos << hw->info.shift;
 | 
			
		||||
        bytes = audio_ring_dist (cntinfo.ptr, pos, bufsize);
 | 
			
		||||
        if (cntinfo.ptr == oss->old_optr) {
 | 
			
		||||
            if (abs (hw->samples - live) < 64) {
 | 
			
		||||
                dolog ("warning: Overrun\n");
 | 
			
		||||
            }
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (cntinfo.ptr > oss->old_optr) {
 | 
			
		||||
            bytes = cntinfo.ptr - oss->old_optr;
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            bytes = bufsize + cntinfo.ptr - oss->old_optr;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        decr = audio_MIN (bytes >> hw->info.shift, live);
 | 
			
		||||
    }
 | 
			
		||||
    else {
 | 
			
		||||
@@ -460,7 +341,7 @@ static int oss_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
        if (abinfo.bytes > bufsize) {
 | 
			
		||||
            if (conf.debug) {
 | 
			
		||||
                dolog ("warning: Invalid available size, size=%d bufsize=%d\n"
 | 
			
		||||
                       "please report your OS/audio hw to av1474@comtv.ru\n",
 | 
			
		||||
                       "please report your OS/audio hw to malc@pulsesoft.com\n",
 | 
			
		||||
                       abinfo.bytes, bufsize);
 | 
			
		||||
            }
 | 
			
		||||
            abinfo.bytes = bufsize;
 | 
			
		||||
@@ -480,10 +361,53 @@ static int oss_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    decr = audio_pcm_hw_clip_out (hw, oss->pcm_buf, decr, oss->pending);
 | 
			
		||||
    oss->pending += decr;
 | 
			
		||||
    oss_write_pending (oss);
 | 
			
		||||
    samples = decr;
 | 
			
		||||
    rpos = hw->rpos;
 | 
			
		||||
    while (samples) {
 | 
			
		||||
        int left_till_end_samples = hw->samples - rpos;
 | 
			
		||||
        int convert_samples = audio_MIN (samples, left_till_end_samples);
 | 
			
		||||
 | 
			
		||||
        src = hw->mix_buf + rpos;
 | 
			
		||||
        dst = advance (oss->pcm_buf, rpos << hw->info.shift);
 | 
			
		||||
 | 
			
		||||
        hw->clip (dst, src, convert_samples);
 | 
			
		||||
        if (!oss->mmapped) {
 | 
			
		||||
            int written;
 | 
			
		||||
 | 
			
		||||
            written = write (oss->fd, dst, convert_samples << hw->info.shift);
 | 
			
		||||
            /* XXX: follow errno recommendations ? */
 | 
			
		||||
            if (written == -1) {
 | 
			
		||||
                oss_logerr (
 | 
			
		||||
                    errno,
 | 
			
		||||
                    "Failed to write %d bytes of audio data from %p\n",
 | 
			
		||||
                    convert_samples << hw->info.shift,
 | 
			
		||||
                    dst
 | 
			
		||||
                    );
 | 
			
		||||
                continue;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (written != convert_samples << hw->info.shift) {
 | 
			
		||||
                int wsamples = written >> hw->info.shift;
 | 
			
		||||
                int wbytes = wsamples << hw->info.shift;
 | 
			
		||||
                if (wbytes != written) {
 | 
			
		||||
                    dolog ("warning: Misaligned write %d (requested %d), "
 | 
			
		||||
                           "alignment %d\n",
 | 
			
		||||
                           wbytes, written, hw->info.align + 1);
 | 
			
		||||
                }
 | 
			
		||||
                decr -= wsamples;
 | 
			
		||||
                rpos = (rpos + wsamples) % hw->samples;
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        rpos = (rpos + convert_samples) % hw->samples;
 | 
			
		||||
        samples -= convert_samples;
 | 
			
		||||
    }
 | 
			
		||||
    if (oss->mmapped) {
 | 
			
		||||
        oss->old_optr = cntinfo.ptr;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw->rpos = rpos;
 | 
			
		||||
    return decr;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -504,7 +428,7 @@ static void oss_fini_out (HWVoiceOut *hw)
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
            g_free (oss->pcm_buf);
 | 
			
		||||
            qemu_free (oss->pcm_buf);
 | 
			
		||||
        }
 | 
			
		||||
        oss->pcm_buf = NULL;
 | 
			
		||||
    }
 | 
			
		||||
@@ -522,7 +446,7 @@ static int oss_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
 | 
			
		||||
    oss->fd = -1;
 | 
			
		||||
 | 
			
		||||
    req.fmt = aud_to_ossfmt (as->fmt, as->endianness);
 | 
			
		||||
    req.fmt = aud_to_ossfmt (as->fmt);
 | 
			
		||||
    req.freq = as->freq;
 | 
			
		||||
    req.nchannels = as->nchannels;
 | 
			
		||||
    req.fragsize = conf.fragsize;
 | 
			
		||||
@@ -557,7 +481,7 @@ static int oss_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    oss->mmapped = 0;
 | 
			
		||||
    if (conf.try_mmap) {
 | 
			
		||||
        oss->pcm_buf = mmap (
 | 
			
		||||
            NULL,
 | 
			
		||||
            0,
 | 
			
		||||
            hw->samples << hw->info.shift,
 | 
			
		||||
            PROT_READ | PROT_WRITE,
 | 
			
		||||
            MAP_SHARED,
 | 
			
		||||
@@ -567,8 +491,7 @@ static int oss_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
        if (oss->pcm_buf == MAP_FAILED) {
 | 
			
		||||
            oss_logerr (errno, "Failed to map %d bytes of DAC\n",
 | 
			
		||||
                        hw->samples << hw->info.shift);
 | 
			
		||||
        }
 | 
			
		||||
        else {
 | 
			
		||||
        } else {
 | 
			
		||||
            int err;
 | 
			
		||||
            int trig = 0;
 | 
			
		||||
            if (ioctl (fd, SNDCTL_DSP_SETTRIGGER, &trig) < 0) {
 | 
			
		||||
@@ -623,48 +546,25 @@ static int oss_ctl_out (HWVoiceOut *hw, int cmd, ...)
 | 
			
		||||
    int trig;
 | 
			
		||||
    OSSVoiceOut *oss = (OSSVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    if (!oss->mmapped) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        {
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            int poll_mode;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            poll_mode = va_arg (ap, int);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            ldebug ("enabling voice\n");
 | 
			
		||||
            if (poll_mode && oss_poll_out (hw)) {
 | 
			
		||||
                poll_mode = 0;
 | 
			
		||||
            }
 | 
			
		||||
            hw->poll_mode = poll_mode;
 | 
			
		||||
 | 
			
		||||
            if (!oss->mmapped) {
 | 
			
		||||
                return 0;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            audio_pcm_info_clear_buf (&hw->info, oss->pcm_buf, hw->samples);
 | 
			
		||||
            trig = PCM_ENABLE_OUTPUT;
 | 
			
		||||
            if (ioctl (oss->fd, SNDCTL_DSP_SETTRIGGER, &trig) < 0) {
 | 
			
		||||
                oss_logerr (
 | 
			
		||||
                    errno,
 | 
			
		||||
                    "SNDCTL_DSP_SETTRIGGER PCM_ENABLE_OUTPUT failed\n"
 | 
			
		||||
                    );
 | 
			
		||||
                return -1;
 | 
			
		||||
            }
 | 
			
		||||
        ldebug ("enabling voice\n");
 | 
			
		||||
        audio_pcm_info_clear_buf (&hw->info, oss->pcm_buf, hw->samples);
 | 
			
		||||
        trig = PCM_ENABLE_OUTPUT;
 | 
			
		||||
        if (ioctl (oss->fd, SNDCTL_DSP_SETTRIGGER, &trig) < 0) {
 | 
			
		||||
            oss_logerr (
 | 
			
		||||
                errno,
 | 
			
		||||
                "SNDCTL_DSP_SETTRIGGER PCM_ENABLE_OUTPUT failed\n"
 | 
			
		||||
                );
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        if (hw->poll_mode) {
 | 
			
		||||
            qemu_set_fd_handler (oss->fd, NULL, NULL, NULL);
 | 
			
		||||
            hw->poll_mode = 0;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (!oss->mmapped) {
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        ldebug ("disabling voice\n");
 | 
			
		||||
        trig = 0;
 | 
			
		||||
        if (ioctl (oss->fd, SNDCTL_DSP_SETTRIGGER, &trig) < 0) {
 | 
			
		||||
@@ -688,7 +588,7 @@ static int oss_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
 | 
			
		||||
    oss->fd = -1;
 | 
			
		||||
 | 
			
		||||
    req.fmt = aud_to_ossfmt (as->fmt, as->endianness);
 | 
			
		||||
    req.fmt = aud_to_ossfmt (as->fmt);
 | 
			
		||||
    req.freq = as->freq;
 | 
			
		||||
    req.nchannels = as->nchannels;
 | 
			
		||||
    req.fragsize = conf.fragsize;
 | 
			
		||||
@@ -736,8 +636,10 @@ static void oss_fini_in (HWVoiceIn *hw)
 | 
			
		||||
 | 
			
		||||
    oss_anal_close (&oss->fd);
 | 
			
		||||
 | 
			
		||||
    g_free(oss->pcm_buf);
 | 
			
		||||
    oss->pcm_buf = NULL;
 | 
			
		||||
    if (oss->pcm_buf) {
 | 
			
		||||
        qemu_free (oss->pcm_buf);
 | 
			
		||||
        oss->pcm_buf = NULL;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int oss_run_in (HWVoiceIn *hw)
 | 
			
		||||
@@ -752,8 +654,8 @@ static int oss_run_in (HWVoiceIn *hw)
 | 
			
		||||
        int add;
 | 
			
		||||
        int len;
 | 
			
		||||
    } bufs[2] = {
 | 
			
		||||
        { .add = hw->wpos, .len = 0 },
 | 
			
		||||
        { .add = 0,        .len = 0 }
 | 
			
		||||
        { hw->wpos, 0 },
 | 
			
		||||
        { 0, 0 }
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    if (!dead) {
 | 
			
		||||
@@ -768,6 +670,7 @@ static int oss_run_in (HWVoiceIn *hw)
 | 
			
		||||
        bufs[0].len = dead << hwshift;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < 2; ++i) {
 | 
			
		||||
        ssize_t nread;
 | 
			
		||||
 | 
			
		||||
@@ -782,7 +685,8 @@ static int oss_run_in (HWVoiceIn *hw)
 | 
			
		||||
                           hw->info.align + 1);
 | 
			
		||||
                }
 | 
			
		||||
                read_samples += nread >> hwshift;
 | 
			
		||||
                hw->conv (hw->conv_buf + bufs[i].add, p, nread >> hwshift);
 | 
			
		||||
                hw->conv (hw->conv_buf + bufs[i].add, p, nread >> hwshift,
 | 
			
		||||
                          &nominal_volume);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (bufs[i].len - nread) {
 | 
			
		||||
@@ -816,41 +720,13 @@ static int oss_read (SWVoiceIn *sw, void *buf, int size)
 | 
			
		||||
 | 
			
		||||
static int oss_ctl_in (HWVoiceIn *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    OSSVoiceIn *oss = (OSSVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        {
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            int poll_mode;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            poll_mode = va_arg (ap, int);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            if (poll_mode && oss_poll_in (hw)) {
 | 
			
		||||
                poll_mode = 0;
 | 
			
		||||
            }
 | 
			
		||||
            hw->poll_mode = poll_mode;
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        if (hw->poll_mode) {
 | 
			
		||||
            hw->poll_mode = 0;
 | 
			
		||||
            qemu_set_fd_handler (oss->fd, NULL, NULL, NULL);
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
    (void) hw;
 | 
			
		||||
    (void) cmd;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void *oss_audio_init (void)
 | 
			
		||||
{
 | 
			
		||||
    if (access(conf.devpath_in, R_OK | W_OK) < 0 ||
 | 
			
		||||
        access(conf.devpath_out, R_OK | W_OK) < 0) {
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
    return &conf;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -860,83 +736,45 @@ static void oss_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option oss_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "FRAGSIZE",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.fragsize,
 | 
			
		||||
        .descr = "Fragment size in bytes"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "NFRAGS",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.nfrags,
 | 
			
		||||
        .descr = "Number of fragments"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "MMAP",
 | 
			
		||||
        .tag   = AUD_OPT_BOOL,
 | 
			
		||||
        .valp  = &conf.try_mmap,
 | 
			
		||||
        .descr = "Try using memory mapped access"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "DAC_DEV",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &conf.devpath_out,
 | 
			
		||||
        .descr = "Path to DAC device"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "ADC_DEV",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &conf.devpath_in,
 | 
			
		||||
        .descr = "Path to ADC device"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "EXCLUSIVE",
 | 
			
		||||
        .tag   = AUD_OPT_BOOL,
 | 
			
		||||
        .valp  = &conf.exclusive,
 | 
			
		||||
        .descr = "Open device in exclusive mode (vmix wont work)"
 | 
			
		||||
    },
 | 
			
		||||
#ifdef USE_DSP_POLICY
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "POLICY",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.policy,
 | 
			
		||||
        .descr = "Set the timing policy of the device, -1 to use fragment mode",
 | 
			
		||||
    },
 | 
			
		||||
#endif
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "DEBUG",
 | 
			
		||||
        .tag   = AUD_OPT_BOOL,
 | 
			
		||||
        .valp  = &conf.debug,
 | 
			
		||||
        .descr = "Turn on some debugging messages"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"FRAGSIZE", AUD_OPT_INT, &conf.fragsize,
 | 
			
		||||
     "Fragment size in bytes", NULL, 0},
 | 
			
		||||
    {"NFRAGS", AUD_OPT_INT, &conf.nfrags,
 | 
			
		||||
     "Number of fragments", NULL, 0},
 | 
			
		||||
    {"MMAP", AUD_OPT_BOOL, &conf.try_mmap,
 | 
			
		||||
     "Try using memory mapped access", NULL, 0},
 | 
			
		||||
    {"DAC_DEV", AUD_OPT_STR, &conf.devpath_out,
 | 
			
		||||
     "Path to DAC device", NULL, 0},
 | 
			
		||||
    {"ADC_DEV", AUD_OPT_STR, &conf.devpath_in,
 | 
			
		||||
     "Path to ADC device", NULL, 0},
 | 
			
		||||
    {"DEBUG", AUD_OPT_BOOL, &conf.debug,
 | 
			
		||||
     "Turn on some debugging messages", NULL, 0},
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops oss_pcm_ops = {
 | 
			
		||||
    .init_out = oss_init_out,
 | 
			
		||||
    .fini_out = oss_fini_out,
 | 
			
		||||
    .run_out  = oss_run_out,
 | 
			
		||||
    .write    = oss_write,
 | 
			
		||||
    .ctl_out  = oss_ctl_out,
 | 
			
		||||
    oss_init_out,
 | 
			
		||||
    oss_fini_out,
 | 
			
		||||
    oss_run_out,
 | 
			
		||||
    oss_write,
 | 
			
		||||
    oss_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = oss_init_in,
 | 
			
		||||
    .fini_in  = oss_fini_in,
 | 
			
		||||
    .run_in   = oss_run_in,
 | 
			
		||||
    .read     = oss_read,
 | 
			
		||||
    .ctl_in   = oss_ctl_in
 | 
			
		||||
    oss_init_in,
 | 
			
		||||
    oss_fini_in,
 | 
			
		||||
    oss_run_in,
 | 
			
		||||
    oss_read,
 | 
			
		||||
    oss_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver oss_audio_driver = {
 | 
			
		||||
    .name           = "oss",
 | 
			
		||||
    .descr          = "OSS http://www.opensound.com",
 | 
			
		||||
    .options        = oss_options,
 | 
			
		||||
    .init           = oss_audio_init,
 | 
			
		||||
    .fini           = oss_audio_fini,
 | 
			
		||||
    .pcm_ops        = &oss_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (OSSVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (OSSVoiceIn)
 | 
			
		||||
    INIT_FIELD (name           = ) "oss",
 | 
			
		||||
    INIT_FIELD (descr          = ) "OSS http://www.opensound.com",
 | 
			
		||||
    INIT_FIELD (options        = ) oss_options,
 | 
			
		||||
    INIT_FIELD (init           = ) oss_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) oss_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &oss_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (OSSVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (OSSVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										627
									
								
								audio/paaudio.c
									
									
									
									
									
								
							
							
						
						
									
										627
									
								
								audio/paaudio.c
									
									
									
									
									
								
							@@ -2,7 +2,8 @@
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
 | 
			
		||||
#include <pulse/pulseaudio.h>
 | 
			
		||||
#include <pulse/simple.h>
 | 
			
		||||
#include <pulse/error.h>
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "pulseaudio"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
@@ -14,7 +15,7 @@ typedef struct {
 | 
			
		||||
    int live;
 | 
			
		||||
    int decr;
 | 
			
		||||
    int rpos;
 | 
			
		||||
    pa_stream *stream;
 | 
			
		||||
    pa_simple *s;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    struct audio_pt pt;
 | 
			
		||||
} PAVoiceOut;
 | 
			
		||||
@@ -25,24 +26,23 @@ typedef struct {
 | 
			
		||||
    int dead;
 | 
			
		||||
    int incr;
 | 
			
		||||
    int wpos;
 | 
			
		||||
    pa_stream *stream;
 | 
			
		||||
    pa_simple *s;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    struct audio_pt pt;
 | 
			
		||||
    const void *read_data;
 | 
			
		||||
    size_t read_index, read_length;
 | 
			
		||||
} PAVoiceIn;
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
static struct {
 | 
			
		||||
    int samples;
 | 
			
		||||
    int divisor;
 | 
			
		||||
    char *server;
 | 
			
		||||
    char *sink;
 | 
			
		||||
    char *source;
 | 
			
		||||
    pa_threaded_mainloop *mainloop;
 | 
			
		||||
    pa_context *context;
 | 
			
		||||
} paaudio;
 | 
			
		||||
 | 
			
		||||
static paaudio glob_paaudio = {
 | 
			
		||||
    .samples = 4096,
 | 
			
		||||
} conf = {
 | 
			
		||||
    1024,
 | 
			
		||||
    2,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void GCC_FMT_ATTR (2, 3) qpa_logerr (int err, const char *fmt, ...)
 | 
			
		||||
@@ -56,150 +56,13 @@ static void GCC_FMT_ATTR (2, 3) qpa_logerr (int err, const char *fmt, ...)
 | 
			
		||||
    AUD_log (AUDIO_CAP, "Reason: %s\n", pa_strerror (err));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#ifndef PA_CONTEXT_IS_GOOD
 | 
			
		||||
static inline int PA_CONTEXT_IS_GOOD(pa_context_state_t x)
 | 
			
		||||
{
 | 
			
		||||
    return
 | 
			
		||||
        x == PA_CONTEXT_CONNECTING ||
 | 
			
		||||
        x == PA_CONTEXT_AUTHORIZING ||
 | 
			
		||||
        x == PA_CONTEXT_SETTING_NAME ||
 | 
			
		||||
        x == PA_CONTEXT_READY;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#ifndef PA_STREAM_IS_GOOD
 | 
			
		||||
static inline int PA_STREAM_IS_GOOD(pa_stream_state_t x)
 | 
			
		||||
{
 | 
			
		||||
    return
 | 
			
		||||
        x == PA_STREAM_CREATING ||
 | 
			
		||||
        x == PA_STREAM_READY;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define CHECK_SUCCESS_GOTO(c, rerror, expression, label)        \
 | 
			
		||||
    do {                                                        \
 | 
			
		||||
        if (!(expression)) {                                    \
 | 
			
		||||
            if (rerror) {                                       \
 | 
			
		||||
                *(rerror) = pa_context_errno ((c)->context);    \
 | 
			
		||||
            }                                                   \
 | 
			
		||||
            goto label;                                         \
 | 
			
		||||
        }                                                       \
 | 
			
		||||
    } while (0);
 | 
			
		||||
 | 
			
		||||
#define CHECK_DEAD_GOTO(c, stream, rerror, label)                       \
 | 
			
		||||
    do {                                                                \
 | 
			
		||||
        if (!(c)->context || !PA_CONTEXT_IS_GOOD (pa_context_get_state((c)->context)) || \
 | 
			
		||||
            !(stream) || !PA_STREAM_IS_GOOD (pa_stream_get_state ((stream)))) { \
 | 
			
		||||
            if (((c)->context && pa_context_get_state ((c)->context) == PA_CONTEXT_FAILED) || \
 | 
			
		||||
                ((stream) && pa_stream_get_state ((stream)) == PA_STREAM_FAILED)) { \
 | 
			
		||||
                if (rerror) {                                           \
 | 
			
		||||
                    *(rerror) = pa_context_errno ((c)->context);        \
 | 
			
		||||
                }                                                       \
 | 
			
		||||
            } else {                                                    \
 | 
			
		||||
                if (rerror) {                                           \
 | 
			
		||||
                    *(rerror) = PA_ERR_BADSTATE;                        \
 | 
			
		||||
                }                                                       \
 | 
			
		||||
            }                                                           \
 | 
			
		||||
            goto label;                                                 \
 | 
			
		||||
        }                                                               \
 | 
			
		||||
    } while (0);
 | 
			
		||||
 | 
			
		||||
static int qpa_simple_read (PAVoiceIn *p, void *data, size_t length, int *rerror)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_lock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    CHECK_DEAD_GOTO (g, p->stream, rerror, unlock_and_fail);
 | 
			
		||||
 | 
			
		||||
    while (length > 0) {
 | 
			
		||||
        size_t l;
 | 
			
		||||
 | 
			
		||||
        while (!p->read_data) {
 | 
			
		||||
            int r;
 | 
			
		||||
 | 
			
		||||
            r = pa_stream_peek (p->stream, &p->read_data, &p->read_length);
 | 
			
		||||
            CHECK_SUCCESS_GOTO (g, rerror, r == 0, unlock_and_fail);
 | 
			
		||||
 | 
			
		||||
            if (!p->read_data) {
 | 
			
		||||
                pa_threaded_mainloop_wait (g->mainloop);
 | 
			
		||||
                CHECK_DEAD_GOTO (g, p->stream, rerror, unlock_and_fail);
 | 
			
		||||
            } else {
 | 
			
		||||
                p->read_index = 0;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        l = p->read_length < length ? p->read_length : length;
 | 
			
		||||
        memcpy (data, (const uint8_t *) p->read_data+p->read_index, l);
 | 
			
		||||
 | 
			
		||||
        data = (uint8_t *) data + l;
 | 
			
		||||
        length -= l;
 | 
			
		||||
 | 
			
		||||
        p->read_index += l;
 | 
			
		||||
        p->read_length -= l;
 | 
			
		||||
 | 
			
		||||
        if (!p->read_length) {
 | 
			
		||||
            int r;
 | 
			
		||||
 | 
			
		||||
            r = pa_stream_drop (p->stream);
 | 
			
		||||
            p->read_data = NULL;
 | 
			
		||||
            p->read_length = 0;
 | 
			
		||||
            p->read_index = 0;
 | 
			
		||||
 | 
			
		||||
            CHECK_SUCCESS_GOTO (g, rerror, r == 0, unlock_and_fail);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
unlock_and_fail:
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qpa_simple_write (PAVoiceOut *p, const void *data, size_t length, int *rerror)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_lock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    CHECK_DEAD_GOTO (g, p->stream, rerror, unlock_and_fail);
 | 
			
		||||
 | 
			
		||||
    while (length > 0) {
 | 
			
		||||
        size_t l;
 | 
			
		||||
        int r;
 | 
			
		||||
 | 
			
		||||
        while (!(l = pa_stream_writable_size (p->stream))) {
 | 
			
		||||
            pa_threaded_mainloop_wait (g->mainloop);
 | 
			
		||||
            CHECK_DEAD_GOTO (g, p->stream, rerror, unlock_and_fail);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        CHECK_SUCCESS_GOTO (g, rerror, l != (size_t) -1, unlock_and_fail);
 | 
			
		||||
 | 
			
		||||
        if (l > length) {
 | 
			
		||||
            l = length;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        r = pa_stream_write (p->stream, data, l, NULL, 0LL, PA_SEEK_RELATIVE);
 | 
			
		||||
        CHECK_SUCCESS_GOTO (g, rerror, r >= 0, unlock_and_fail);
 | 
			
		||||
 | 
			
		||||
        data = (const uint8_t *) data + l;
 | 
			
		||||
        length -= l;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
unlock_and_fail:
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void *qpa_thread_out (void *arg)
 | 
			
		||||
{
 | 
			
		||||
    PAVoiceOut *pa = arg;
 | 
			
		||||
    HWVoiceOut *hw = &pa->hw;
 | 
			
		||||
    int threshold;
 | 
			
		||||
 | 
			
		||||
    threshold = conf.divisor ? hw->samples / conf.divisor : 0;
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_lock (&pa->pt, AUDIO_FUNC)) {
 | 
			
		||||
        return NULL;
 | 
			
		||||
@@ -213,7 +76,7 @@ static void *qpa_thread_out (void *arg)
 | 
			
		||||
                goto exit;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (pa->live > 0) {
 | 
			
		||||
            if (pa->live > threshold) {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
@@ -222,8 +85,8 @@ static void *qpa_thread_out (void *arg)
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        decr = to_mix = audio_MIN (pa->live, glob_paaudio.samples >> 2);
 | 
			
		||||
        rpos = pa->rpos;
 | 
			
		||||
        decr = to_mix = pa->live;
 | 
			
		||||
        rpos = hw->rpos;
 | 
			
		||||
 | 
			
		||||
        if (audio_pt_unlock (&pa->pt, AUDIO_FUNC)) {
 | 
			
		||||
            return NULL;
 | 
			
		||||
@@ -236,8 +99,8 @@ static void *qpa_thread_out (void *arg)
 | 
			
		||||
 | 
			
		||||
            hw->clip (pa->pcm_buf, src, chunk);
 | 
			
		||||
 | 
			
		||||
            if (qpa_simple_write (pa, pa->pcm_buf,
 | 
			
		||||
                                  chunk << hw->info.shift, &error) < 0) {
 | 
			
		||||
            if (pa_simple_write (pa->s, pa->pcm_buf,
 | 
			
		||||
                                 chunk << hw->info.shift, &error) < 0) {
 | 
			
		||||
                qpa_logerr (error, "pa_simple_write failed\n");
 | 
			
		||||
                return NULL;
 | 
			
		||||
            }
 | 
			
		||||
@@ -260,15 +123,16 @@ static void *qpa_thread_out (void *arg)
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qpa_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int qpa_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    int decr;
 | 
			
		||||
    int live, decr;
 | 
			
		||||
    PAVoiceOut *pa = (PAVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_lock (&pa->pt, AUDIO_FUNC)) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
    decr = audio_MIN (live, pa->decr);
 | 
			
		||||
    pa->decr -= decr;
 | 
			
		||||
    pa->live = live - decr;
 | 
			
		||||
@@ -292,6 +156,9 @@ static void *qpa_thread_in (void *arg)
 | 
			
		||||
{
 | 
			
		||||
    PAVoiceIn *pa = arg;
 | 
			
		||||
    HWVoiceIn *hw = &pa->hw;
 | 
			
		||||
    int threshold;
 | 
			
		||||
 | 
			
		||||
    threshold = conf.divisor ? hw->samples / conf.divisor : 0;
 | 
			
		||||
 | 
			
		||||
    if (audio_pt_lock (&pa->pt, AUDIO_FUNC)) {
 | 
			
		||||
        return NULL;
 | 
			
		||||
@@ -305,7 +172,7 @@ static void *qpa_thread_in (void *arg)
 | 
			
		||||
                goto exit;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (pa->dead > 0) {
 | 
			
		||||
            if (pa->dead > threshold) {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
@@ -314,8 +181,8 @@ static void *qpa_thread_in (void *arg)
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        incr = to_grab = audio_MIN (pa->dead, glob_paaudio.samples >> 2);
 | 
			
		||||
        wpos = pa->wpos;
 | 
			
		||||
        incr = to_grab = pa->dead;
 | 
			
		||||
        wpos = hw->wpos;
 | 
			
		||||
 | 
			
		||||
        if (audio_pt_unlock (&pa->pt, AUDIO_FUNC)) {
 | 
			
		||||
            return NULL;
 | 
			
		||||
@@ -326,13 +193,13 @@ static void *qpa_thread_in (void *arg)
 | 
			
		||||
            int chunk = audio_MIN (to_grab, hw->samples - wpos);
 | 
			
		||||
            void *buf = advance (pa->pcm_buf, wpos);
 | 
			
		||||
 | 
			
		||||
            if (qpa_simple_read (pa, buf,
 | 
			
		||||
                                 chunk << hw->info.shift, &error) < 0) {
 | 
			
		||||
            if (pa_simple_read (pa->s, buf,
 | 
			
		||||
                                chunk << hw->info.shift, &error) < 0) {
 | 
			
		||||
                qpa_logerr (error, "pa_simple_read failed\n");
 | 
			
		||||
                return NULL;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            hw->conv (hw->conv_buf + wpos, buf, chunk);
 | 
			
		||||
            hw->conv (hw->conv_buf + wpos, buf, chunk, &nominal_volume);
 | 
			
		||||
            wpos = (wpos + chunk) % hw->samples;
 | 
			
		||||
            to_grab -= chunk;
 | 
			
		||||
        }
 | 
			
		||||
@@ -428,117 +295,10 @@ static audfmt_e pa_to_audfmt (pa_sample_format_t fmt, int *endianness)
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void context_state_cb (pa_context *c, void *userdata)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
    switch (pa_context_get_state(c)) {
 | 
			
		||||
    case PA_CONTEXT_READY:
 | 
			
		||||
    case PA_CONTEXT_TERMINATED:
 | 
			
		||||
    case PA_CONTEXT_FAILED:
 | 
			
		||||
        pa_threaded_mainloop_signal (g->mainloop, 0);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case PA_CONTEXT_UNCONNECTED:
 | 
			
		||||
    case PA_CONTEXT_CONNECTING:
 | 
			
		||||
    case PA_CONTEXT_AUTHORIZING:
 | 
			
		||||
    case PA_CONTEXT_SETTING_NAME:
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void stream_state_cb (pa_stream *s, void * userdata)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
    switch (pa_stream_get_state (s)) {
 | 
			
		||||
 | 
			
		||||
    case PA_STREAM_READY:
 | 
			
		||||
    case PA_STREAM_FAILED:
 | 
			
		||||
    case PA_STREAM_TERMINATED:
 | 
			
		||||
        pa_threaded_mainloop_signal (g->mainloop, 0);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case PA_STREAM_UNCONNECTED:
 | 
			
		||||
    case PA_STREAM_CREATING:
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void stream_request_cb (pa_stream *s, size_t length, void *userdata)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_signal (g->mainloop, 0);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static pa_stream *qpa_simple_new (
 | 
			
		||||
        const char *server,
 | 
			
		||||
        const char *name,
 | 
			
		||||
        pa_stream_direction_t dir,
 | 
			
		||||
        const char *dev,
 | 
			
		||||
        const char *stream_name,
 | 
			
		||||
        const pa_sample_spec *ss,
 | 
			
		||||
        const pa_channel_map *map,
 | 
			
		||||
        const pa_buffer_attr *attr,
 | 
			
		||||
        int *rerror)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
    int r;
 | 
			
		||||
    pa_stream *stream;
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_lock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    stream = pa_stream_new (g->context, name, ss, map);
 | 
			
		||||
    if (!stream) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_stream_set_state_callback (stream, stream_state_cb, g);
 | 
			
		||||
    pa_stream_set_read_callback (stream, stream_request_cb, g);
 | 
			
		||||
    pa_stream_set_write_callback (stream, stream_request_cb, g);
 | 
			
		||||
 | 
			
		||||
    if (dir == PA_STREAM_PLAYBACK) {
 | 
			
		||||
        r = pa_stream_connect_playback (stream, dev, attr,
 | 
			
		||||
                                        PA_STREAM_INTERPOLATE_TIMING
 | 
			
		||||
#ifdef PA_STREAM_ADJUST_LATENCY
 | 
			
		||||
                                        |PA_STREAM_ADJUST_LATENCY
 | 
			
		||||
#endif
 | 
			
		||||
                                        |PA_STREAM_AUTO_TIMING_UPDATE, NULL, NULL);
 | 
			
		||||
    } else {
 | 
			
		||||
        r = pa_stream_connect_record (stream, dev, attr,
 | 
			
		||||
                                      PA_STREAM_INTERPOLATE_TIMING
 | 
			
		||||
#ifdef PA_STREAM_ADJUST_LATENCY
 | 
			
		||||
                                      |PA_STREAM_ADJUST_LATENCY
 | 
			
		||||
#endif
 | 
			
		||||
                                      |PA_STREAM_AUTO_TIMING_UPDATE);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (r < 0) {
 | 
			
		||||
      goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    return stream;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    if (stream) {
 | 
			
		||||
        pa_stream_unref (stream);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *rerror = pa_context_errno (g->context);
 | 
			
		||||
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qpa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    int error;
 | 
			
		||||
    static pa_sample_spec ss;
 | 
			
		||||
    static pa_buffer_attr ba;
 | 
			
		||||
    struct audsettings obt_as = *as;
 | 
			
		||||
    PAVoiceOut *pa = (PAVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
@@ -546,37 +306,27 @@ static int qpa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    ss.channels = as->nchannels;
 | 
			
		||||
    ss.rate = as->freq;
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * qemu audio tick runs at 100 Hz (by default), so processing
 | 
			
		||||
     * data chunks worth 10 ms of sound should be a good fit.
 | 
			
		||||
     */
 | 
			
		||||
    ba.tlength = pa_usec_to_bytes (10 * 1000, &ss);
 | 
			
		||||
    ba.minreq = pa_usec_to_bytes (5 * 1000, &ss);
 | 
			
		||||
    ba.maxlength = -1;
 | 
			
		||||
    ba.prebuf = -1;
 | 
			
		||||
 | 
			
		||||
    obt_as.fmt = pa_to_audfmt (ss.format, &obt_as.endianness);
 | 
			
		||||
 | 
			
		||||
    pa->stream = qpa_simple_new (
 | 
			
		||||
        glob_paaudio.server,
 | 
			
		||||
    pa->s = pa_simple_new (
 | 
			
		||||
        conf.server,
 | 
			
		||||
        "qemu",
 | 
			
		||||
        PA_STREAM_PLAYBACK,
 | 
			
		||||
        glob_paaudio.sink,
 | 
			
		||||
        conf.sink,
 | 
			
		||||
        "pcm.playback",
 | 
			
		||||
        &ss,
 | 
			
		||||
        NULL,                   /* channel map */
 | 
			
		||||
        &ba,                    /* buffering attributes */
 | 
			
		||||
        NULL,                   /* buffering attributes */
 | 
			
		||||
        &error
 | 
			
		||||
        );
 | 
			
		||||
    if (!pa->stream) {
 | 
			
		||||
    if (!pa->s) {
 | 
			
		||||
        qpa_logerr (error, "pa_simple_new for playback failed\n");
 | 
			
		||||
        goto fail1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &obt_as);
 | 
			
		||||
    hw->samples = glob_paaudio.samples;
 | 
			
		||||
    hw->samples = conf.samples;
 | 
			
		||||
    pa->pcm_buf = audio_calloc (AUDIO_FUNC, hw->samples, 1 << hw->info.shift);
 | 
			
		||||
    pa->rpos = hw->rpos;
 | 
			
		||||
    if (!pa->pcm_buf) {
 | 
			
		||||
        dolog ("Could not allocate buffer (%d bytes)\n",
 | 
			
		||||
               hw->samples << hw->info.shift);
 | 
			
		||||
@@ -590,13 +340,11 @@ static int qpa_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 fail3:
 | 
			
		||||
    g_free (pa->pcm_buf);
 | 
			
		||||
    free (pa->pcm_buf);
 | 
			
		||||
    pa->pcm_buf = NULL;
 | 
			
		||||
 fail2:
 | 
			
		||||
    if (pa->stream) {
 | 
			
		||||
        pa_stream_unref (pa->stream);
 | 
			
		||||
        pa->stream = NULL;
 | 
			
		||||
    }
 | 
			
		||||
    pa_simple_free (pa->s);
 | 
			
		||||
    pa->s = NULL;
 | 
			
		||||
 fail1:
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
@@ -614,26 +362,25 @@ static int qpa_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
 | 
			
		||||
    obt_as.fmt = pa_to_audfmt (ss.format, &obt_as.endianness);
 | 
			
		||||
 | 
			
		||||
    pa->stream = qpa_simple_new (
 | 
			
		||||
        glob_paaudio.server,
 | 
			
		||||
    pa->s = pa_simple_new (
 | 
			
		||||
        conf.server,
 | 
			
		||||
        "qemu",
 | 
			
		||||
        PA_STREAM_RECORD,
 | 
			
		||||
        glob_paaudio.source,
 | 
			
		||||
        conf.source,
 | 
			
		||||
        "pcm.capture",
 | 
			
		||||
        &ss,
 | 
			
		||||
        NULL,                   /* channel map */
 | 
			
		||||
        NULL,                   /* buffering attributes */
 | 
			
		||||
        &error
 | 
			
		||||
        );
 | 
			
		||||
    if (!pa->stream) {
 | 
			
		||||
    if (!pa->s) {
 | 
			
		||||
        qpa_logerr (error, "pa_simple_new for capture failed\n");
 | 
			
		||||
        goto fail1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &obt_as);
 | 
			
		||||
    hw->samples = glob_paaudio.samples;
 | 
			
		||||
    hw->samples = conf.samples;
 | 
			
		||||
    pa->pcm_buf = audio_calloc (AUDIO_FUNC, hw->samples, 1 << hw->info.shift);
 | 
			
		||||
    pa->wpos = hw->wpos;
 | 
			
		||||
    if (!pa->pcm_buf) {
 | 
			
		||||
        dolog ("Could not allocate buffer (%d bytes)\n",
 | 
			
		||||
               hw->samples << hw->info.shift);
 | 
			
		||||
@@ -647,13 +394,11 @@ static int qpa_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 fail3:
 | 
			
		||||
    g_free (pa->pcm_buf);
 | 
			
		||||
    free (pa->pcm_buf);
 | 
			
		||||
    pa->pcm_buf = NULL;
 | 
			
		||||
 fail2:
 | 
			
		||||
    if (pa->stream) {
 | 
			
		||||
        pa_stream_unref (pa->stream);
 | 
			
		||||
        pa->stream = NULL;
 | 
			
		||||
    }
 | 
			
		||||
    pa_simple_free (pa->s);
 | 
			
		||||
    pa->s = NULL;
 | 
			
		||||
 fail1:
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
@@ -668,13 +413,13 @@ static void qpa_fini_out (HWVoiceOut *hw)
 | 
			
		||||
    audio_pt_unlock_and_signal (&pa->pt, AUDIO_FUNC);
 | 
			
		||||
    audio_pt_join (&pa->pt, &ret, AUDIO_FUNC);
 | 
			
		||||
 | 
			
		||||
    if (pa->stream) {
 | 
			
		||||
        pa_stream_unref (pa->stream);
 | 
			
		||||
        pa->stream = NULL;
 | 
			
		||||
    if (pa->s) {
 | 
			
		||||
        pa_simple_free (pa->s);
 | 
			
		||||
        pa->s = NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    audio_pt_fini (&pa->pt, AUDIO_FUNC);
 | 
			
		||||
    g_free (pa->pcm_buf);
 | 
			
		||||
    qemu_free (pa->pcm_buf);
 | 
			
		||||
    pa->pcm_buf = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -688,255 +433,83 @@ static void qpa_fini_in (HWVoiceIn *hw)
 | 
			
		||||
    audio_pt_unlock_and_signal (&pa->pt, AUDIO_FUNC);
 | 
			
		||||
    audio_pt_join (&pa->pt, &ret, AUDIO_FUNC);
 | 
			
		||||
 | 
			
		||||
    if (pa->stream) {
 | 
			
		||||
        pa_stream_unref (pa->stream);
 | 
			
		||||
        pa->stream = NULL;
 | 
			
		||||
    if (pa->s) {
 | 
			
		||||
        pa_simple_free (pa->s);
 | 
			
		||||
        pa->s = NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    audio_pt_fini (&pa->pt, AUDIO_FUNC);
 | 
			
		||||
    g_free (pa->pcm_buf);
 | 
			
		||||
    qemu_free (pa->pcm_buf);
 | 
			
		||||
    pa->pcm_buf = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qpa_ctl_out (HWVoiceOut *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    PAVoiceOut *pa = (PAVoiceOut *) hw;
 | 
			
		||||
    pa_operation *op;
 | 
			
		||||
    pa_cvolume v;
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
#ifdef PA_CHECK_VERSION    /* macro is present in 0.9.16+ */
 | 
			
		||||
    pa_cvolume_init (&v);  /* function is present in 0.9.13+ */
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_VOLUME:
 | 
			
		||||
        {
 | 
			
		||||
            SWVoiceOut *sw;
 | 
			
		||||
            va_list ap;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            sw = va_arg (ap, SWVoiceOut *);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            v.channels = 2;
 | 
			
		||||
            v.values[0] = ((PA_VOLUME_NORM - PA_VOLUME_MUTED) * sw->vol.l) / UINT32_MAX;
 | 
			
		||||
            v.values[1] = ((PA_VOLUME_NORM - PA_VOLUME_MUTED) * sw->vol.r) / UINT32_MAX;
 | 
			
		||||
 | 
			
		||||
            pa_threaded_mainloop_lock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
            op = pa_context_set_sink_input_volume (g->context,
 | 
			
		||||
                pa_stream_get_index (pa->stream),
 | 
			
		||||
                &v, NULL, NULL);
 | 
			
		||||
            if (!op)
 | 
			
		||||
                qpa_logerr (pa_context_errno (g->context),
 | 
			
		||||
                            "set_sink_input_volume() failed\n");
 | 
			
		||||
            else
 | 
			
		||||
                pa_operation_unref (op);
 | 
			
		||||
 | 
			
		||||
            op = pa_context_set_sink_input_mute (g->context,
 | 
			
		||||
                pa_stream_get_index (pa->stream),
 | 
			
		||||
               sw->vol.mute, NULL, NULL);
 | 
			
		||||
            if (!op) {
 | 
			
		||||
                qpa_logerr (pa_context_errno (g->context),
 | 
			
		||||
                            "set_sink_input_mute() failed\n");
 | 
			
		||||
            } else {
 | 
			
		||||
                pa_operation_unref (op);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    (void) hw;
 | 
			
		||||
    (void) cmd;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qpa_ctl_in (HWVoiceIn *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    PAVoiceIn *pa = (PAVoiceIn *) hw;
 | 
			
		||||
    pa_operation *op;
 | 
			
		||||
    pa_cvolume v;
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
#ifdef PA_CHECK_VERSION
 | 
			
		||||
    pa_cvolume_init (&v);
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_VOLUME:
 | 
			
		||||
        {
 | 
			
		||||
            SWVoiceIn *sw;
 | 
			
		||||
            va_list ap;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            sw = va_arg (ap, SWVoiceIn *);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            v.channels = 2;
 | 
			
		||||
            v.values[0] = ((PA_VOLUME_NORM - PA_VOLUME_MUTED) * sw->vol.l) / UINT32_MAX;
 | 
			
		||||
            v.values[1] = ((PA_VOLUME_NORM - PA_VOLUME_MUTED) * sw->vol.r) / UINT32_MAX;
 | 
			
		||||
 | 
			
		||||
            pa_threaded_mainloop_lock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
            /* FIXME: use the upcoming "set_source_output_{volume,mute}" */
 | 
			
		||||
            op = pa_context_set_source_volume_by_index (g->context,
 | 
			
		||||
                pa_stream_get_device_index (pa->stream),
 | 
			
		||||
                &v, NULL, NULL);
 | 
			
		||||
            if (!op) {
 | 
			
		||||
                qpa_logerr (pa_context_errno (g->context),
 | 
			
		||||
                            "set_source_volume() failed\n");
 | 
			
		||||
            } else {
 | 
			
		||||
                pa_operation_unref(op);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            op = pa_context_set_source_mute_by_index (g->context,
 | 
			
		||||
                pa_stream_get_index (pa->stream),
 | 
			
		||||
                sw->vol.mute, NULL, NULL);
 | 
			
		||||
            if (!op) {
 | 
			
		||||
                qpa_logerr (pa_context_errno (g->context),
 | 
			
		||||
                            "set_source_mute() failed\n");
 | 
			
		||||
            } else {
 | 
			
		||||
                pa_operation_unref (op);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    (void) hw;
 | 
			
		||||
    (void) cmd;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* common */
 | 
			
		||||
static void *qpa_audio_init (void)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
    g->mainloop = pa_threaded_mainloop_new ();
 | 
			
		||||
    if (!g->mainloop) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g->context = pa_context_new (pa_threaded_mainloop_get_api (g->mainloop), glob_paaudio.server);
 | 
			
		||||
    if (!g->context) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_context_set_state_callback (g->context, context_state_cb, g);
 | 
			
		||||
 | 
			
		||||
    if (pa_context_connect (g->context, glob_paaudio.server, 0, NULL) < 0) {
 | 
			
		||||
        qpa_logerr (pa_context_errno (g->context),
 | 
			
		||||
                    "pa_context_connect() failed\n");
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_lock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    if (pa_threaded_mainloop_start (g->mainloop) < 0) {
 | 
			
		||||
        goto unlock_and_fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (;;) {
 | 
			
		||||
        pa_context_state_t state;
 | 
			
		||||
 | 
			
		||||
        state = pa_context_get_state (g->context);
 | 
			
		||||
 | 
			
		||||
        if (state == PA_CONTEXT_READY) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (!PA_CONTEXT_IS_GOOD (state)) {
 | 
			
		||||
            qpa_logerr (pa_context_errno (g->context),
 | 
			
		||||
                        "Wrong context state\n");
 | 
			
		||||
            goto unlock_and_fail;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* Wait until the context is ready */
 | 
			
		||||
        pa_threaded_mainloop_wait (g->mainloop);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
 | 
			
		||||
    return &glob_paaudio;
 | 
			
		||||
 | 
			
		||||
unlock_and_fail:
 | 
			
		||||
    pa_threaded_mainloop_unlock (g->mainloop);
 | 
			
		||||
fail:
 | 
			
		||||
    AUD_log (AUDIO_CAP, "Failed to initialize PA context");
 | 
			
		||||
    return NULL;
 | 
			
		||||
    return &conf;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qpa_audio_fini (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    paaudio *g = opaque;
 | 
			
		||||
 | 
			
		||||
    if (g->mainloop) {
 | 
			
		||||
        pa_threaded_mainloop_stop (g->mainloop);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (g->context) {
 | 
			
		||||
        pa_context_disconnect (g->context);
 | 
			
		||||
        pa_context_unref (g->context);
 | 
			
		||||
        g->context = NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (g->mainloop) {
 | 
			
		||||
        pa_threaded_mainloop_free (g->mainloop);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g->mainloop = NULL;
 | 
			
		||||
    (void) opaque;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
struct audio_option qpa_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SAMPLES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &glob_paaudio.samples,
 | 
			
		||||
        .descr = "buffer size in samples"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SERVER",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &glob_paaudio.server,
 | 
			
		||||
        .descr = "server address"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SINK",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &glob_paaudio.sink,
 | 
			
		||||
        .descr = "sink device name"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SOURCE",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &glob_paaudio.source,
 | 
			
		||||
        .descr = "source device name"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"SAMPLES", AUD_OPT_INT, &conf.samples,
 | 
			
		||||
     "buffer size in samples", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"DIVISOR", AUD_OPT_INT, &conf.divisor,
 | 
			
		||||
     "threshold divisor", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"SERVER", AUD_OPT_STR, &conf.server,
 | 
			
		||||
     "server address", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"SINK", AUD_OPT_STR, &conf.sink,
 | 
			
		||||
     "sink device name", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"SOURCE", AUD_OPT_STR, &conf.source,
 | 
			
		||||
     "source device name", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops qpa_pcm_ops = {
 | 
			
		||||
    .init_out = qpa_init_out,
 | 
			
		||||
    .fini_out = qpa_fini_out,
 | 
			
		||||
    .run_out  = qpa_run_out,
 | 
			
		||||
    .write    = qpa_write,
 | 
			
		||||
    .ctl_out  = qpa_ctl_out,
 | 
			
		||||
 | 
			
		||||
    .init_in  = qpa_init_in,
 | 
			
		||||
    .fini_in  = qpa_fini_in,
 | 
			
		||||
    .run_in   = qpa_run_in,
 | 
			
		||||
    .read     = qpa_read,
 | 
			
		||||
    .ctl_in   = qpa_ctl_in
 | 
			
		||||
    qpa_init_out,
 | 
			
		||||
    qpa_fini_out,
 | 
			
		||||
    qpa_run_out,
 | 
			
		||||
    qpa_write,
 | 
			
		||||
    qpa_ctl_out,
 | 
			
		||||
    qpa_init_in,
 | 
			
		||||
    qpa_fini_in,
 | 
			
		||||
    qpa_run_in,
 | 
			
		||||
    qpa_read,
 | 
			
		||||
    qpa_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver pa_audio_driver = {
 | 
			
		||||
    .name           = "pa",
 | 
			
		||||
    .descr          = "http://www.pulseaudio.org/",
 | 
			
		||||
    .options        = qpa_options,
 | 
			
		||||
    .init           = qpa_audio_init,
 | 
			
		||||
    .fini           = qpa_audio_fini,
 | 
			
		||||
    .pcm_ops        = &qpa_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (PAVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (PAVoiceIn),
 | 
			
		||||
    .ctl_caps       = VOICE_VOLUME_CAP
 | 
			
		||||
    INIT_FIELD (name           = ) "pa",
 | 
			
		||||
    INIT_FIELD (descr          = ) "http://www.pulseaudio.org/",
 | 
			
		||||
    INIT_FIELD (options        = ) qpa_options,
 | 
			
		||||
    INIT_FIELD (init           = ) qpa_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) qpa_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &qpa_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 0,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) INT_MAX,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (PAVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) sizeof (PAVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										118
									
								
								audio/sdlaudio.c
									
									
									
									
									
								
							
							
						
						
									
										118
									
								
								audio/sdlaudio.c
									
									
									
									
									
								
							@@ -29,9 +29,10 @@
 | 
			
		||||
#ifndef _WIN32
 | 
			
		||||
#ifdef __sun__
 | 
			
		||||
#define _POSIX_PTHREAD_SEMANTICS 1
 | 
			
		||||
#elif defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__DragonFly__)
 | 
			
		||||
#elif defined(__OpenBSD__) || defined(__FreeBSD__)
 | 
			
		||||
#include <pthread.h>
 | 
			
		||||
#endif
 | 
			
		||||
#include <signal.h>
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "sdl"
 | 
			
		||||
@@ -47,7 +48,7 @@ typedef struct SDLVoiceOut {
 | 
			
		||||
static struct {
 | 
			
		||||
    int nb_samples;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .nb_samples = 1024
 | 
			
		||||
    1024
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct SDLAudioState {
 | 
			
		||||
@@ -114,19 +115,23 @@ static int sdl_unlock_and_post (SDLAudioState *s, const char *forfn)
 | 
			
		||||
    return sdl_post (s, forfn);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int aud_to_sdlfmt (audfmt_e fmt)
 | 
			
		||||
static int aud_to_sdlfmt (audfmt_e fmt, int *shift)
 | 
			
		||||
{
 | 
			
		||||
    switch (fmt) {
 | 
			
		||||
    case AUD_FMT_S8:
 | 
			
		||||
        *shift = 0;
 | 
			
		||||
        return AUDIO_S8;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_U8:
 | 
			
		||||
        *shift = 0;
 | 
			
		||||
        return AUDIO_U8;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_S16:
 | 
			
		||||
        *shift = 1;
 | 
			
		||||
        return AUDIO_S16LSB;
 | 
			
		||||
 | 
			
		||||
    case AUD_FMT_U16:
 | 
			
		||||
        *shift = 1;
 | 
			
		||||
        return AUDIO_U16LSB;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
@@ -138,36 +143,36 @@ static int aud_to_sdlfmt (audfmt_e fmt)
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int sdl_to_audfmt(int sdlfmt, audfmt_e *fmt, int *endianness)
 | 
			
		||||
static int sdl_to_audfmt (int sdlfmt, audfmt_e *fmt, int *endianess)
 | 
			
		||||
{
 | 
			
		||||
    switch (sdlfmt) {
 | 
			
		||||
    case AUDIO_S8:
 | 
			
		||||
        *endianness = 0;
 | 
			
		||||
        *endianess = 0;
 | 
			
		||||
        *fmt = AUD_FMT_S8;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUDIO_U8:
 | 
			
		||||
        *endianness = 0;
 | 
			
		||||
        *endianess = 0;
 | 
			
		||||
        *fmt = AUD_FMT_U8;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUDIO_S16LSB:
 | 
			
		||||
        *endianness = 0;
 | 
			
		||||
        *endianess = 0;
 | 
			
		||||
        *fmt = AUD_FMT_S16;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUDIO_U16LSB:
 | 
			
		||||
        *endianness = 0;
 | 
			
		||||
        *endianess = 0;
 | 
			
		||||
        *fmt = AUD_FMT_U16;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUDIO_S16MSB:
 | 
			
		||||
        *endianness = 1;
 | 
			
		||||
        *endianess = 1;
 | 
			
		||||
        *fmt = AUD_FMT_S16;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case AUDIO_U16MSB:
 | 
			
		||||
        *endianness = 1;
 | 
			
		||||
        *endianess = 1;
 | 
			
		||||
        *fmt = AUD_FMT_U16;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
@@ -183,20 +188,11 @@ static int sdl_open (SDL_AudioSpec *req, SDL_AudioSpec *obt)
 | 
			
		||||
{
 | 
			
		||||
    int status;
 | 
			
		||||
#ifndef _WIN32
 | 
			
		||||
    int err;
 | 
			
		||||
    sigset_t new, old;
 | 
			
		||||
 | 
			
		||||
    /* Make sure potential threads created by SDL don't hog signals.  */
 | 
			
		||||
    err = sigfillset (&new);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        dolog ("sdl_open: sigfillset failed: %s\n", strerror (errno));
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    err = pthread_sigmask (SIG_BLOCK, &new, &old);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        dolog ("sdl_open: pthread_sigmask failed: %s\n", strerror (err));
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    sigfillset (&new);
 | 
			
		||||
    pthread_sigmask (SIG_BLOCK, &new, &old);
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    status = SDL_OpenAudio (req, obt);
 | 
			
		||||
@@ -205,14 +201,7 @@ static int sdl_open (SDL_AudioSpec *req, SDL_AudioSpec *obt)
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
#ifndef _WIN32
 | 
			
		||||
    err = pthread_sigmask (SIG_SETMASK, &old, NULL);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        dolog ("sdl_open: pthread_sigmask (restore) failed: %s\n",
 | 
			
		||||
               strerror (errno));
 | 
			
		||||
        /* We have failed to restore original signal mask, all bets are off,
 | 
			
		||||
           so exit the process */
 | 
			
		||||
        exit (EXIT_FAILURE);
 | 
			
		||||
    }
 | 
			
		||||
    pthread_sigmask (SIG_SETMASK, &old, 0);
 | 
			
		||||
#endif
 | 
			
		||||
    return status;
 | 
			
		||||
}
 | 
			
		||||
@@ -293,16 +282,18 @@ static int sdl_write_out (SWVoiceOut *sw, void *buf, int len)
 | 
			
		||||
    return audio_pcm_sw_write (sw, buf, len);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int sdl_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int sdl_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    int decr;
 | 
			
		||||
    int decr, live;
 | 
			
		||||
    SDLVoiceOut *sdl = (SDLVoiceOut *) hw;
 | 
			
		||||
    SDLAudioState *s = &glob_sdl;
 | 
			
		||||
 | 
			
		||||
    if (sdl_lock (s, "sdl_run_out")) {
 | 
			
		||||
    if (sdl_lock (s, "sdl_callback")) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
 | 
			
		||||
    if (sdl->decr > live) {
 | 
			
		||||
        ldebug ("sdl->decr %d live %d sdl->live %d\n",
 | 
			
		||||
                sdl->decr,
 | 
			
		||||
@@ -317,10 +308,10 @@ static int sdl_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
    hw->rpos = sdl->rpos;
 | 
			
		||||
 | 
			
		||||
    if (sdl->live > 0) {
 | 
			
		||||
        sdl_unlock_and_post (s, "sdl_run_out");
 | 
			
		||||
        sdl_unlock_and_post (s, "sdl_callback");
 | 
			
		||||
    }
 | 
			
		||||
    else {
 | 
			
		||||
        sdl_unlock (s, "sdl_run_out");
 | 
			
		||||
        sdl_unlock (s, "sdl_callback");
 | 
			
		||||
    }
 | 
			
		||||
    return decr;
 | 
			
		||||
}
 | 
			
		||||
@@ -337,13 +328,16 @@ static int sdl_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    SDLVoiceOut *sdl = (SDLVoiceOut *) hw;
 | 
			
		||||
    SDLAudioState *s = &glob_sdl;
 | 
			
		||||
    SDL_AudioSpec req, obt;
 | 
			
		||||
    int endianness;
 | 
			
		||||
    int shift;
 | 
			
		||||
    int endianess;
 | 
			
		||||
    int err;
 | 
			
		||||
    audfmt_e effective_fmt;
 | 
			
		||||
    struct audsettings obt_as;
 | 
			
		||||
 | 
			
		||||
    shift <<= as->nchannels == 2;
 | 
			
		||||
 | 
			
		||||
    req.freq = as->freq;
 | 
			
		||||
    req.format = aud_to_sdlfmt (as->fmt);
 | 
			
		||||
    req.format = aud_to_sdlfmt (as->fmt, &shift);
 | 
			
		||||
    req.channels = as->nchannels;
 | 
			
		||||
    req.samples = conf.nb_samples;
 | 
			
		||||
    req.callback = sdl_callback;
 | 
			
		||||
@@ -353,7 +347,7 @@ static int sdl_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    err = sdl_to_audfmt(obt.format, &effective_fmt, &endianness);
 | 
			
		||||
    err = sdl_to_audfmt (obt.format, &effective_fmt, &endianess);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        sdl_close (s);
 | 
			
		||||
        return -1;
 | 
			
		||||
@@ -362,7 +356,7 @@ static int sdl_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    obt_as.freq = obt.freq;
 | 
			
		||||
    obt_as.nchannels = obt.channels;
 | 
			
		||||
    obt_as.fmt = effective_fmt;
 | 
			
		||||
    obt_as.endianness = endianness;
 | 
			
		||||
    obt_as.endianness = endianess;
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &obt_as);
 | 
			
		||||
    hw->samples = obt.samples;
 | 
			
		||||
@@ -426,33 +420,35 @@ static void sdl_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option sdl_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "SAMPLES",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.nb_samples,
 | 
			
		||||
        .descr = "Size of SDL buffer in samples"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"SAMPLES", AUD_OPT_INT, &conf.nb_samples,
 | 
			
		||||
     "Size of SDL buffer in samples", NULL, 0},
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops sdl_pcm_ops = {
 | 
			
		||||
    .init_out = sdl_init_out,
 | 
			
		||||
    .fini_out = sdl_fini_out,
 | 
			
		||||
    .run_out  = sdl_run_out,
 | 
			
		||||
    .write    = sdl_write_out,
 | 
			
		||||
    .ctl_out  = sdl_ctl_out,
 | 
			
		||||
    sdl_init_out,
 | 
			
		||||
    sdl_fini_out,
 | 
			
		||||
    sdl_run_out,
 | 
			
		||||
    sdl_write_out,
 | 
			
		||||
    sdl_ctl_out,
 | 
			
		||||
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver sdl_audio_driver = {
 | 
			
		||||
    .name           = "sdl",
 | 
			
		||||
    .descr          = "SDL http://www.libsdl.org",
 | 
			
		||||
    .options        = sdl_options,
 | 
			
		||||
    .init           = sdl_audio_init,
 | 
			
		||||
    .fini           = sdl_audio_fini,
 | 
			
		||||
    .pcm_ops        = &sdl_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = 1,
 | 
			
		||||
    .max_voices_in  = 0,
 | 
			
		||||
    .voice_size_out = sizeof (SDLVoiceOut),
 | 
			
		||||
    .voice_size_in  = 0
 | 
			
		||||
    INIT_FIELD (name           = ) "sdl",
 | 
			
		||||
    INIT_FIELD (descr          = ) "SDL http://www.libsdl.org",
 | 
			
		||||
    INIT_FIELD (options        = ) sdl_options,
 | 
			
		||||
    INIT_FIELD (init           = ) sdl_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) sdl_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &sdl_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) 0,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (SDLVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) 0
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
@@ -1,409 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Copyright (C) 2010 Red Hat, Inc.
 | 
			
		||||
 *
 | 
			
		||||
 * maintained by Gerd Hoffmann <kraxel@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This program is free software; you can redistribute it and/or
 | 
			
		||||
 * modify it under the terms of the GNU General Public License as
 | 
			
		||||
 * published by the Free Software Foundation; either version 2 or
 | 
			
		||||
 * (at your option) version 3 of the License.
 | 
			
		||||
 *
 | 
			
		||||
 * This program is distributed in the hope that it will be useful,
 | 
			
		||||
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
			
		||||
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
			
		||||
 * GNU General Public License for more details.
 | 
			
		||||
 *
 | 
			
		||||
 * You should have received a copy of the GNU General Public License
 | 
			
		||||
 * along with this program; if not, see <http://www.gnu.org/licenses/>.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "hw/hw.h"
 | 
			
		||||
#include "qemu/timer.h"
 | 
			
		||||
#include "ui/qemu-spice.h"
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "spice"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
 | 
			
		||||
#if SPICE_INTERFACE_PLAYBACK_MAJOR > 1 || SPICE_INTERFACE_PLAYBACK_MINOR >= 3
 | 
			
		||||
#define LINE_OUT_SAMPLES (480 * 4)
 | 
			
		||||
#else
 | 
			
		||||
#define LINE_OUT_SAMPLES (256 * 4)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#if SPICE_INTERFACE_RECORD_MAJOR > 2 || SPICE_INTERFACE_RECORD_MINOR >= 3
 | 
			
		||||
#define LINE_IN_SAMPLES (480 * 4)
 | 
			
		||||
#else
 | 
			
		||||
#define LINE_IN_SAMPLES (256 * 4)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
typedef struct SpiceRateCtl {
 | 
			
		||||
    int64_t               start_ticks;
 | 
			
		||||
    int64_t               bytes_sent;
 | 
			
		||||
} SpiceRateCtl;
 | 
			
		||||
 | 
			
		||||
typedef struct SpiceVoiceOut {
 | 
			
		||||
    HWVoiceOut            hw;
 | 
			
		||||
    SpicePlaybackInstance sin;
 | 
			
		||||
    SpiceRateCtl          rate;
 | 
			
		||||
    int                   active;
 | 
			
		||||
    uint32_t              *frame;
 | 
			
		||||
    uint32_t              *fpos;
 | 
			
		||||
    uint32_t              fsize;
 | 
			
		||||
} SpiceVoiceOut;
 | 
			
		||||
 | 
			
		||||
typedef struct SpiceVoiceIn {
 | 
			
		||||
    HWVoiceIn             hw;
 | 
			
		||||
    SpiceRecordInstance   sin;
 | 
			
		||||
    SpiceRateCtl          rate;
 | 
			
		||||
    int                   active;
 | 
			
		||||
    uint32_t              samples[LINE_IN_SAMPLES];
 | 
			
		||||
} SpiceVoiceIn;
 | 
			
		||||
 | 
			
		||||
static const SpicePlaybackInterface playback_sif = {
 | 
			
		||||
    .base.type          = SPICE_INTERFACE_PLAYBACK,
 | 
			
		||||
    .base.description   = "playback",
 | 
			
		||||
    .base.major_version = SPICE_INTERFACE_PLAYBACK_MAJOR,
 | 
			
		||||
    .base.minor_version = SPICE_INTERFACE_PLAYBACK_MINOR,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static const SpiceRecordInterface record_sif = {
 | 
			
		||||
    .base.type          = SPICE_INTERFACE_RECORD,
 | 
			
		||||
    .base.description   = "record",
 | 
			
		||||
    .base.major_version = SPICE_INTERFACE_RECORD_MAJOR,
 | 
			
		||||
    .base.minor_version = SPICE_INTERFACE_RECORD_MINOR,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void *spice_audio_init (void)
 | 
			
		||||
{
 | 
			
		||||
    if (!using_spice) {
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
    return &spice_audio_init;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void spice_audio_fini (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    /* nothing */
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rate_start (SpiceRateCtl *rate)
 | 
			
		||||
{
 | 
			
		||||
    memset (rate, 0, sizeof (*rate));
 | 
			
		||||
    rate->start_ticks = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int rate_get_samples (struct audio_pcm_info *info, SpiceRateCtl *rate)
 | 
			
		||||
{
 | 
			
		||||
    int64_t now;
 | 
			
		||||
    int64_t ticks;
 | 
			
		||||
    int64_t bytes;
 | 
			
		||||
    int64_t samples;
 | 
			
		||||
 | 
			
		||||
    now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 | 
			
		||||
    ticks = now - rate->start_ticks;
 | 
			
		||||
    bytes = muldiv64 (ticks, info->bytes_per_second, get_ticks_per_sec ());
 | 
			
		||||
    samples = (bytes - rate->bytes_sent) >> info->shift;
 | 
			
		||||
    if (samples < 0 || samples > 65536) {
 | 
			
		||||
        error_report("Resetting rate control (%" PRId64 " samples)", samples);
 | 
			
		||||
        rate_start (rate);
 | 
			
		||||
        samples = 0;
 | 
			
		||||
    }
 | 
			
		||||
    rate->bytes_sent += samples << info->shift;
 | 
			
		||||
    return samples;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* playback */
 | 
			
		||||
 | 
			
		||||
static int line_out_init (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceOut *out = container_of (hw, SpiceVoiceOut, hw);
 | 
			
		||||
    struct audsettings settings;
 | 
			
		||||
 | 
			
		||||
#if SPICE_INTERFACE_PLAYBACK_MAJOR > 1 || SPICE_INTERFACE_PLAYBACK_MINOR >= 3
 | 
			
		||||
    settings.freq       = spice_server_get_best_playback_rate(NULL);
 | 
			
		||||
#else
 | 
			
		||||
    settings.freq       = SPICE_INTERFACE_PLAYBACK_FREQ;
 | 
			
		||||
#endif
 | 
			
		||||
    settings.nchannels  = SPICE_INTERFACE_PLAYBACK_CHAN;
 | 
			
		||||
    settings.fmt        = AUD_FMT_S16;
 | 
			
		||||
    settings.endianness = AUDIO_HOST_ENDIANNESS;
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &settings);
 | 
			
		||||
    hw->samples = LINE_OUT_SAMPLES;
 | 
			
		||||
    out->active = 0;
 | 
			
		||||
 | 
			
		||||
    out->sin.base.sif = &playback_sif.base;
 | 
			
		||||
    qemu_spice_add_interface (&out->sin.base);
 | 
			
		||||
#if SPICE_INTERFACE_PLAYBACK_MAJOR > 1 || SPICE_INTERFACE_PLAYBACK_MINOR >= 3
 | 
			
		||||
    spice_server_set_playback_rate(&out->sin, settings.freq);
 | 
			
		||||
#endif
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void line_out_fini (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceOut *out = container_of (hw, SpiceVoiceOut, hw);
 | 
			
		||||
 | 
			
		||||
    spice_server_remove_interface (&out->sin.base);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int line_out_run (HWVoiceOut *hw, int live)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceOut *out = container_of (hw, SpiceVoiceOut, hw);
 | 
			
		||||
    int rpos, decr;
 | 
			
		||||
    int samples;
 | 
			
		||||
 | 
			
		||||
    if (!live) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    decr = rate_get_samples (&hw->info, &out->rate);
 | 
			
		||||
    decr = audio_MIN (live, decr);
 | 
			
		||||
 | 
			
		||||
    samples = decr;
 | 
			
		||||
    rpos = hw->rpos;
 | 
			
		||||
    while (samples) {
 | 
			
		||||
        int left_till_end_samples = hw->samples - rpos;
 | 
			
		||||
        int len = audio_MIN (samples, left_till_end_samples);
 | 
			
		||||
 | 
			
		||||
        if (!out->frame) {
 | 
			
		||||
            spice_server_playback_get_buffer (&out->sin, &out->frame, &out->fsize);
 | 
			
		||||
            out->fpos = out->frame;
 | 
			
		||||
        }
 | 
			
		||||
        if (out->frame) {
 | 
			
		||||
            len = audio_MIN (len, out->fsize);
 | 
			
		||||
            hw->clip (out->fpos, hw->mix_buf + rpos, len);
 | 
			
		||||
            out->fsize -= len;
 | 
			
		||||
            out->fpos  += len;
 | 
			
		||||
            if (out->fsize == 0) {
 | 
			
		||||
                spice_server_playback_put_samples (&out->sin, out->frame);
 | 
			
		||||
                out->frame = out->fpos = NULL;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        rpos = (rpos + len) % hw->samples;
 | 
			
		||||
        samples -= len;
 | 
			
		||||
    }
 | 
			
		||||
    hw->rpos = rpos;
 | 
			
		||||
    return decr;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int line_out_write (SWVoiceOut *sw, void *buf, int len)
 | 
			
		||||
{
 | 
			
		||||
    return audio_pcm_sw_write (sw, buf, len);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int line_out_ctl (HWVoiceOut *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceOut *out = container_of (hw, SpiceVoiceOut, hw);
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        if (out->active) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        out->active = 1;
 | 
			
		||||
        rate_start (&out->rate);
 | 
			
		||||
        spice_server_playback_start (&out->sin);
 | 
			
		||||
        break;
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        if (!out->active) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        out->active = 0;
 | 
			
		||||
        if (out->frame) {
 | 
			
		||||
            memset (out->fpos, 0, out->fsize << 2);
 | 
			
		||||
            spice_server_playback_put_samples (&out->sin, out->frame);
 | 
			
		||||
            out->frame = out->fpos = NULL;
 | 
			
		||||
        }
 | 
			
		||||
        spice_server_playback_stop (&out->sin);
 | 
			
		||||
        break;
 | 
			
		||||
    case VOICE_VOLUME:
 | 
			
		||||
        {
 | 
			
		||||
#if ((SPICE_INTERFACE_PLAYBACK_MAJOR >= 1) && (SPICE_INTERFACE_PLAYBACK_MINOR >= 2))
 | 
			
		||||
            SWVoiceOut *sw;
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            uint16_t vol[2];
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            sw = va_arg (ap, SWVoiceOut *);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            vol[0] = sw->vol.l / ((1ULL << 16) + 1);
 | 
			
		||||
            vol[1] = sw->vol.r / ((1ULL << 16) + 1);
 | 
			
		||||
            spice_server_playback_set_volume (&out->sin, 2, vol);
 | 
			
		||||
            spice_server_playback_set_mute (&out->sin, sw->vol.mute);
 | 
			
		||||
#endif
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* record */
 | 
			
		||||
 | 
			
		||||
static int line_in_init (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceIn *in = container_of (hw, SpiceVoiceIn, hw);
 | 
			
		||||
    struct audsettings settings;
 | 
			
		||||
 | 
			
		||||
#if SPICE_INTERFACE_RECORD_MAJOR > 2 || SPICE_INTERFACE_RECORD_MINOR >= 3
 | 
			
		||||
    settings.freq       = spice_server_get_best_record_rate(NULL);
 | 
			
		||||
#else
 | 
			
		||||
    settings.freq       = SPICE_INTERFACE_RECORD_FREQ;
 | 
			
		||||
#endif
 | 
			
		||||
    settings.nchannels  = SPICE_INTERFACE_RECORD_CHAN;
 | 
			
		||||
    settings.fmt        = AUD_FMT_S16;
 | 
			
		||||
    settings.endianness = AUDIO_HOST_ENDIANNESS;
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, &settings);
 | 
			
		||||
    hw->samples = LINE_IN_SAMPLES;
 | 
			
		||||
    in->active = 0;
 | 
			
		||||
 | 
			
		||||
    in->sin.base.sif = &record_sif.base;
 | 
			
		||||
    qemu_spice_add_interface (&in->sin.base);
 | 
			
		||||
#if SPICE_INTERFACE_RECORD_MAJOR > 2 || SPICE_INTERFACE_RECORD_MINOR >= 3
 | 
			
		||||
    spice_server_set_record_rate(&in->sin, settings.freq);
 | 
			
		||||
#endif
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void line_in_fini (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceIn *in = container_of (hw, SpiceVoiceIn, hw);
 | 
			
		||||
 | 
			
		||||
    spice_server_remove_interface (&in->sin.base);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int line_in_run (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceIn *in = container_of (hw, SpiceVoiceIn, hw);
 | 
			
		||||
    int num_samples;
 | 
			
		||||
    int ready;
 | 
			
		||||
    int len[2];
 | 
			
		||||
    uint64_t delta_samp;
 | 
			
		||||
    const uint32_t *samples;
 | 
			
		||||
 | 
			
		||||
    if (!(num_samples = hw->samples - audio_pcm_hw_get_live_in (hw))) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    delta_samp = rate_get_samples (&hw->info, &in->rate);
 | 
			
		||||
    num_samples = audio_MIN (num_samples, delta_samp);
 | 
			
		||||
 | 
			
		||||
    ready = spice_server_record_get_samples (&in->sin, in->samples, num_samples);
 | 
			
		||||
    samples = in->samples;
 | 
			
		||||
    if (ready == 0) {
 | 
			
		||||
        static const uint32_t silence[LINE_IN_SAMPLES];
 | 
			
		||||
        samples = silence;
 | 
			
		||||
        ready = LINE_IN_SAMPLES;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    num_samples = audio_MIN (ready, num_samples);
 | 
			
		||||
 | 
			
		||||
    if (hw->wpos + num_samples > hw->samples) {
 | 
			
		||||
        len[0] = hw->samples - hw->wpos;
 | 
			
		||||
        len[1] = num_samples - len[0];
 | 
			
		||||
    } else {
 | 
			
		||||
        len[0] = num_samples;
 | 
			
		||||
        len[1] = 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw->conv (hw->conv_buf + hw->wpos, samples, len[0]);
 | 
			
		||||
 | 
			
		||||
    if (len[1]) {
 | 
			
		||||
        hw->conv (hw->conv_buf, samples + len[0], len[1]);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hw->wpos = (hw->wpos + num_samples) % hw->samples;
 | 
			
		||||
 | 
			
		||||
    return num_samples;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int line_in_read (SWVoiceIn *sw, void *buf, int size)
 | 
			
		||||
{
 | 
			
		||||
    return audio_pcm_sw_read (sw, buf, size);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int line_in_ctl (HWVoiceIn *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    SpiceVoiceIn *in = container_of (hw, SpiceVoiceIn, hw);
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        if (in->active) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        in->active = 1;
 | 
			
		||||
        rate_start (&in->rate);
 | 
			
		||||
        spice_server_record_start (&in->sin);
 | 
			
		||||
        break;
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        if (!in->active) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        in->active = 0;
 | 
			
		||||
        spice_server_record_stop (&in->sin);
 | 
			
		||||
        break;
 | 
			
		||||
    case VOICE_VOLUME:
 | 
			
		||||
        {
 | 
			
		||||
#if ((SPICE_INTERFACE_RECORD_MAJOR >= 2) && (SPICE_INTERFACE_RECORD_MINOR >= 2))
 | 
			
		||||
            SWVoiceIn *sw;
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            uint16_t vol[2];
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            sw = va_arg (ap, SWVoiceIn *);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            vol[0] = sw->vol.l / ((1ULL << 16) + 1);
 | 
			
		||||
            vol[1] = sw->vol.r / ((1ULL << 16) + 1);
 | 
			
		||||
            spice_server_record_set_volume (&in->sin, 2, vol);
 | 
			
		||||
            spice_server_record_set_mute (&in->sin, sw->vol.mute);
 | 
			
		||||
#endif
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option audio_options[] = {
 | 
			
		||||
    { /* end of list */ },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops audio_callbacks = {
 | 
			
		||||
    .init_out = line_out_init,
 | 
			
		||||
    .fini_out = line_out_fini,
 | 
			
		||||
    .run_out  = line_out_run,
 | 
			
		||||
    .write    = line_out_write,
 | 
			
		||||
    .ctl_out  = line_out_ctl,
 | 
			
		||||
 | 
			
		||||
    .init_in  = line_in_init,
 | 
			
		||||
    .fini_in  = line_in_fini,
 | 
			
		||||
    .run_in   = line_in_run,
 | 
			
		||||
    .read     = line_in_read,
 | 
			
		||||
    .ctl_in   = line_in_ctl,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver spice_audio_driver = {
 | 
			
		||||
    .name           = "spice",
 | 
			
		||||
    .descr          = "spice audio driver",
 | 
			
		||||
    .options        = audio_options,
 | 
			
		||||
    .init           = spice_audio_init,
 | 
			
		||||
    .fini           = spice_audio_fini,
 | 
			
		||||
    .pcm_ops        = &audio_callbacks,
 | 
			
		||||
    .max_voices_out = 1,
 | 
			
		||||
    .max_voices_in  = 1,
 | 
			
		||||
    .voice_size_out = sizeof (SpiceVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (SpiceVoiceIn),
 | 
			
		||||
#if ((SPICE_INTERFACE_PLAYBACK_MAJOR >= 1) && (SPICE_INTERFACE_PLAYBACK_MINOR >= 2))
 | 
			
		||||
    .ctl_caps       = VOICE_VOLUME_CAP
 | 
			
		||||
#endif
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
void qemu_spice_audio_init (void)
 | 
			
		||||
{
 | 
			
		||||
    spice_audio_driver.can_be_default = 1;
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										153
									
								
								audio/wavaudio.c
									
									
									
									
									
								
							
							
						
						
									
										153
									
								
								audio/wavaudio.c
									
									
									
									
									
								
							@@ -22,7 +22,7 @@
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "hw/hw.h"
 | 
			
		||||
#include "qemu/timer.h"
 | 
			
		||||
#include "qemu-timer.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "wav"
 | 
			
		||||
@@ -30,7 +30,7 @@
 | 
			
		||||
 | 
			
		||||
typedef struct WAVVoiceOut {
 | 
			
		||||
    HWVoiceOut hw;
 | 
			
		||||
    FILE *f;
 | 
			
		||||
    QEMUFile *f;
 | 
			
		||||
    int64_t old_ticks;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    int total_samples;
 | 
			
		||||
@@ -40,22 +40,24 @@ static struct {
 | 
			
		||||
    struct audsettings settings;
 | 
			
		||||
    const char *wav_path;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .settings.freq      = 44100,
 | 
			
		||||
    .settings.nchannels = 2,
 | 
			
		||||
    .settings.fmt       = AUD_FMT_S16,
 | 
			
		||||
    .wav_path           = "qemu.wav"
 | 
			
		||||
    {
 | 
			
		||||
        44100,
 | 
			
		||||
        2,
 | 
			
		||||
        AUD_FMT_S16,
 | 
			
		||||
        0
 | 
			
		||||
    },
 | 
			
		||||
    "qemu.wav"
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int wav_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
static int wav_run_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    WAVVoiceOut *wav = (WAVVoiceOut *) hw;
 | 
			
		||||
    int rpos, decr, samples;
 | 
			
		||||
    int rpos, live, decr, samples;
 | 
			
		||||
    uint8_t *dst;
 | 
			
		||||
    struct st_sample *src;
 | 
			
		||||
    int64_t now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 | 
			
		||||
    int64_t now = qemu_get_clock (vm_clock);
 | 
			
		||||
    int64_t ticks = now - wav->old_ticks;
 | 
			
		||||
    int64_t bytes =
 | 
			
		||||
        muldiv64 (ticks, hw->info.bytes_per_second, get_ticks_per_sec ());
 | 
			
		||||
    int64_t bytes = (ticks * hw->info.bytes_per_second) / ticks_per_sec;
 | 
			
		||||
 | 
			
		||||
    if (bytes > INT_MAX) {
 | 
			
		||||
        samples = INT_MAX >> hw->info.shift;
 | 
			
		||||
@@ -64,6 +66,11 @@ static int wav_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
        samples = bytes >> hw->info.shift;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    live = audio_pcm_hw_get_live_out (hw);
 | 
			
		||||
    if (!live) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    wav->old_ticks = now;
 | 
			
		||||
    decr = audio_MIN (live, samples);
 | 
			
		||||
    samples = decr;
 | 
			
		||||
@@ -76,10 +83,7 @@ static int wav_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
        dst = advance (wav->pcm_buf, rpos << hw->info.shift);
 | 
			
		||||
 | 
			
		||||
        hw->clip (dst, src, convert_samples);
 | 
			
		||||
        if (fwrite (dst, convert_samples << hw->info.shift, 1, wav->f) != 1) {
 | 
			
		||||
            dolog ("wav_run_out: fwrite of %d bytes failed\nReaons: %s\n",
 | 
			
		||||
                   convert_samples << hw->info.shift, strerror (errno));
 | 
			
		||||
        }
 | 
			
		||||
        qemu_put_buffer (wav->f, dst, convert_samples << hw->info.shift);
 | 
			
		||||
 | 
			
		||||
        rpos = (rpos + convert_samples) % hw->samples;
 | 
			
		||||
        samples -= convert_samples;
 | 
			
		||||
@@ -155,20 +159,16 @@ static int wav_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
    le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4);
 | 
			
		||||
    le_store (hdr + 32, 1 << (bits16 + stereo), 2);
 | 
			
		||||
 | 
			
		||||
    wav->f = fopen (conf.wav_path, "wb");
 | 
			
		||||
    wav->f = qemu_fopen (conf.wav_path, "wb");
 | 
			
		||||
    if (!wav->f) {
 | 
			
		||||
        dolog ("Failed to open wave file `%s'\nReason: %s\n",
 | 
			
		||||
               conf.wav_path, strerror (errno));
 | 
			
		||||
        g_free (wav->pcm_buf);
 | 
			
		||||
        qemu_free (wav->pcm_buf);
 | 
			
		||||
        wav->pcm_buf = NULL;
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) {
 | 
			
		||||
        dolog ("wav_init_out: failed to write header\nReason: %s\n",
 | 
			
		||||
               strerror(errno));
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_put_buffer (wav->f, hdr, sizeof (hdr));
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -187,35 +187,16 @@ static void wav_fini_out (HWVoiceOut *hw)
 | 
			
		||||
    le_store (rlen, rifflen, 4);
 | 
			
		||||
    le_store (dlen, datalen, 4);
 | 
			
		||||
 | 
			
		||||
    if (fseek (wav->f, 4, SEEK_SET)) {
 | 
			
		||||
        dolog ("wav_fini_out: fseek to rlen failed\nReason: %s\n",
 | 
			
		||||
               strerror(errno));
 | 
			
		||||
        goto doclose;
 | 
			
		||||
    }
 | 
			
		||||
    if (fwrite (rlen, 4, 1, wav->f) != 1) {
 | 
			
		||||
        dolog ("wav_fini_out: failed to write rlen\nReason: %s\n",
 | 
			
		||||
               strerror (errno));
 | 
			
		||||
        goto doclose;
 | 
			
		||||
    }
 | 
			
		||||
    if (fseek (wav->f, 32, SEEK_CUR)) {
 | 
			
		||||
        dolog ("wav_fini_out: fseek to dlen failed\nReason: %s\n",
 | 
			
		||||
               strerror (errno));
 | 
			
		||||
        goto doclose;
 | 
			
		||||
    }
 | 
			
		||||
    if (fwrite (dlen, 4, 1, wav->f) != 1) {
 | 
			
		||||
        dolog ("wav_fini_out: failed to write dlen\nReaons: %s\n",
 | 
			
		||||
               strerror (errno));
 | 
			
		||||
        goto doclose;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_fseek (wav->f, 4, SEEK_SET);
 | 
			
		||||
    qemu_put_buffer (wav->f, rlen, 4);
 | 
			
		||||
 | 
			
		||||
 doclose:
 | 
			
		||||
    if (fclose (wav->f))  {
 | 
			
		||||
        dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
 | 
			
		||||
               wav->f, strerror (errno));
 | 
			
		||||
    }
 | 
			
		||||
    qemu_fseek (wav->f, 32, SEEK_CUR);
 | 
			
		||||
    qemu_put_buffer (wav->f, dlen, 4);
 | 
			
		||||
 | 
			
		||||
    qemu_fclose (wav->f);
 | 
			
		||||
    wav->f = NULL;
 | 
			
		||||
 | 
			
		||||
    g_free (wav->pcm_buf);
 | 
			
		||||
    qemu_free (wav->pcm_buf);
 | 
			
		||||
    wav->pcm_buf = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -238,51 +219,45 @@ static void wav_audio_fini (void *opaque)
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option wav_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "FREQUENCY",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.settings.freq,
 | 
			
		||||
        .descr = "Frequency"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "FORMAT",
 | 
			
		||||
        .tag   = AUD_OPT_FMT,
 | 
			
		||||
        .valp  = &conf.settings.fmt,
 | 
			
		||||
        .descr = "Format"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "DAC_FIXED_CHANNELS",
 | 
			
		||||
        .tag   = AUD_OPT_INT,
 | 
			
		||||
        .valp  = &conf.settings.nchannels,
 | 
			
		||||
        .descr = "Number of channels (1 - mono, 2 - stereo)"
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name  = "PATH",
 | 
			
		||||
        .tag   = AUD_OPT_STR,
 | 
			
		||||
        .valp  = &conf.wav_path,
 | 
			
		||||
        .descr = "Path to wave file"
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
    {"FREQUENCY", AUD_OPT_INT, &conf.settings.freq,
 | 
			
		||||
     "Frequency", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"FORMAT", AUD_OPT_FMT, &conf.settings.fmt,
 | 
			
		||||
     "Format", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"DAC_FIXED_CHANNELS", AUD_OPT_INT, &conf.settings.nchannels,
 | 
			
		||||
     "Number of channels (1 - mono, 2 - stereo)", NULL, 0},
 | 
			
		||||
 | 
			
		||||
    {"PATH", AUD_OPT_STR, &conf.wav_path,
 | 
			
		||||
     "Path to wave file", NULL, 0},
 | 
			
		||||
    {NULL, 0, NULL, NULL, NULL, 0}
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops wav_pcm_ops = {
 | 
			
		||||
    .init_out = wav_init_out,
 | 
			
		||||
    .fini_out = wav_fini_out,
 | 
			
		||||
    .run_out  = wav_run_out,
 | 
			
		||||
    .write    = wav_write_out,
 | 
			
		||||
    .ctl_out  = wav_ctl_out,
 | 
			
		||||
    wav_init_out,
 | 
			
		||||
    wav_fini_out,
 | 
			
		||||
    wav_run_out,
 | 
			
		||||
    wav_write_out,
 | 
			
		||||
    wav_ctl_out,
 | 
			
		||||
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver wav_audio_driver = {
 | 
			
		||||
    .name           = "wav",
 | 
			
		||||
    .descr          = "WAV renderer http://wikipedia.org/wiki/WAV",
 | 
			
		||||
    .options        = wav_options,
 | 
			
		||||
    .init           = wav_audio_init,
 | 
			
		||||
    .fini           = wav_audio_fini,
 | 
			
		||||
    .pcm_ops        = &wav_pcm_ops,
 | 
			
		||||
    .can_be_default = 0,
 | 
			
		||||
    .max_voices_out = 1,
 | 
			
		||||
    .max_voices_in  = 0,
 | 
			
		||||
    .voice_size_out = sizeof (WAVVoiceOut),
 | 
			
		||||
    .voice_size_in  = 0
 | 
			
		||||
    INIT_FIELD (name           = ) "wav",
 | 
			
		||||
    INIT_FIELD (descr          = )
 | 
			
		||||
    "WAV renderer http://wikipedia.org/wiki/WAV",
 | 
			
		||||
    INIT_FIELD (options        = ) wav_options,
 | 
			
		||||
    INIT_FIELD (init           = ) wav_audio_init,
 | 
			
		||||
    INIT_FIELD (fini           = ) wav_audio_fini,
 | 
			
		||||
    INIT_FIELD (pcm_ops        = ) &wav_pcm_ops,
 | 
			
		||||
    INIT_FIELD (can_be_default = ) 0,
 | 
			
		||||
    INIT_FIELD (max_voices_out = ) 1,
 | 
			
		||||
    INIT_FIELD (max_voices_in  = ) 0,
 | 
			
		||||
    INIT_FIELD (voice_size_out = ) sizeof (WAVVoiceOut),
 | 
			
		||||
    INIT_FIELD (voice_size_in  = ) 0
 | 
			
		||||
};
 | 
			
		||||
 
 | 
			
		||||
@@ -1,9 +1,9 @@
 | 
			
		||||
#include "hw/hw.h"
 | 
			
		||||
#include "monitor/monitor.h"
 | 
			
		||||
#include "console.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    FILE *f;
 | 
			
		||||
    QEMUFile *f;
 | 
			
		||||
    int bytes;
 | 
			
		||||
    char *path;
 | 
			
		||||
    int freq;
 | 
			
		||||
@@ -35,49 +35,27 @@ static void wav_destroy (void *opaque)
 | 
			
		||||
    uint8_t dlen[4];
 | 
			
		||||
    uint32_t datalen = wav->bytes;
 | 
			
		||||
    uint32_t rifflen = datalen + 36;
 | 
			
		||||
    Monitor *mon = cur_mon;
 | 
			
		||||
 | 
			
		||||
    if (wav->f) {
 | 
			
		||||
        le_store (rlen, rifflen, 4);
 | 
			
		||||
        le_store (dlen, datalen, 4);
 | 
			
		||||
 | 
			
		||||
        if (fseek (wav->f, 4, SEEK_SET)) {
 | 
			
		||||
            monitor_printf (mon, "wav_destroy: rlen fseek failed\nReason: %s\n",
 | 
			
		||||
                            strerror (errno));
 | 
			
		||||
            goto doclose;
 | 
			
		||||
        }
 | 
			
		||||
        if (fwrite (rlen, 4, 1, wav->f) != 1) {
 | 
			
		||||
            monitor_printf (mon, "wav_destroy: rlen fwrite failed\nReason %s\n",
 | 
			
		||||
                            strerror (errno));
 | 
			
		||||
            goto doclose;
 | 
			
		||||
        }
 | 
			
		||||
        if (fseek (wav->f, 32, SEEK_CUR)) {
 | 
			
		||||
            monitor_printf (mon, "wav_destroy: dlen fseek failed\nReason %s\n",
 | 
			
		||||
                            strerror (errno));
 | 
			
		||||
            goto doclose;
 | 
			
		||||
        }
 | 
			
		||||
        if (fwrite (dlen, 1, 4, wav->f) != 4) {
 | 
			
		||||
            monitor_printf (mon, "wav_destroy: dlen fwrite failed\nReason %s\n",
 | 
			
		||||
                            strerror (errno));
 | 
			
		||||
            goto doclose;
 | 
			
		||||
        }
 | 
			
		||||
    doclose:
 | 
			
		||||
        if (fclose (wav->f)) {
 | 
			
		||||
            error_report("wav_destroy: fclose failed: %s", strerror(errno));
 | 
			
		||||
        }
 | 
			
		||||
        qemu_fseek (wav->f, 4, SEEK_SET);
 | 
			
		||||
        qemu_put_buffer (wav->f, rlen, 4);
 | 
			
		||||
 | 
			
		||||
        qemu_fseek (wav->f, 32, SEEK_CUR);
 | 
			
		||||
        qemu_put_buffer (wav->f, dlen, 4);
 | 
			
		||||
        qemu_fclose (wav->f);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free (wav->path);
 | 
			
		||||
    qemu_free (wav->path);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void wav_capture (void *opaque, void *buf, int size)
 | 
			
		||||
{
 | 
			
		||||
    WAVState *wav = opaque;
 | 
			
		||||
 | 
			
		||||
    if (fwrite (buf, size, 1, wav->f) != 1) {
 | 
			
		||||
        monitor_printf (cur_mon, "wav_capture: fwrite error\nReason: %s",
 | 
			
		||||
                        strerror (errno));
 | 
			
		||||
    }
 | 
			
		||||
    qemu_put_buffer (wav->f, buf, size);
 | 
			
		||||
    wav->bytes += size;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
@@ -93,9 +71,9 @@ static void wav_capture_info (void *opaque)
 | 
			
		||||
    WAVState *wav = opaque;
 | 
			
		||||
    char *path = wav->path;
 | 
			
		||||
 | 
			
		||||
    monitor_printf (cur_mon, "Capturing audio(%d,%d,%d) to %s: %d bytes\n",
 | 
			
		||||
                    wav->freq, wav->bits, wav->nchannels,
 | 
			
		||||
                    path ? path : "<not available>", wav->bytes);
 | 
			
		||||
    term_printf ("Capturing audio(%d,%d,%d) to %s: %d bytes\n",
 | 
			
		||||
                 wav->freq, wav->bits, wav->nchannels,
 | 
			
		||||
                 path ? path : "<not available>", wav->bytes);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct capture_ops wav_capture_ops = {
 | 
			
		||||
@@ -106,7 +84,6 @@ static struct capture_ops wav_capture_ops = {
 | 
			
		||||
int wav_start_capture (CaptureState *s, const char *path, int freq,
 | 
			
		||||
                       int bits, int nchannels)
 | 
			
		||||
{
 | 
			
		||||
    Monitor *mon = cur_mon;
 | 
			
		||||
    WAVState *wav;
 | 
			
		||||
    uint8_t hdr[] = {
 | 
			
		||||
        0x52, 0x49, 0x46, 0x46, 0x00, 0x00, 0x00, 0x00, 0x57, 0x41, 0x56,
 | 
			
		||||
@@ -120,13 +97,13 @@ int wav_start_capture (CaptureState *s, const char *path, int freq,
 | 
			
		||||
    CaptureVoiceOut *cap;
 | 
			
		||||
 | 
			
		||||
    if (bits != 8 && bits != 16) {
 | 
			
		||||
        monitor_printf (mon, "incorrect bit count %d, must be 8 or 16\n", bits);
 | 
			
		||||
        term_printf ("incorrect bit count %d, must be 8 or 16\n", bits);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (nchannels != 1 && nchannels != 2) {
 | 
			
		||||
        monitor_printf (mon, "incorrect channel count %d, must be 1 or 2\n",
 | 
			
		||||
                        nchannels);
 | 
			
		||||
        term_printf ("incorrect channel count %d, must be 1 or 2\n",
 | 
			
		||||
                     nchannels);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
@@ -142,7 +119,7 @@ int wav_start_capture (CaptureState *s, const char *path, int freq,
 | 
			
		||||
    ops.capture = wav_capture;
 | 
			
		||||
    ops.destroy = wav_destroy;
 | 
			
		||||
 | 
			
		||||
    wav = g_malloc0 (sizeof (*wav));
 | 
			
		||||
    wav = qemu_mallocz (sizeof (*wav));
 | 
			
		||||
 | 
			
		||||
    shift = bits16 + stereo;
 | 
			
		||||
    hdr[34] = bits16 ? 0x10 : 0x08;
 | 
			
		||||
@@ -152,42 +129,32 @@ int wav_start_capture (CaptureState *s, const char *path, int freq,
 | 
			
		||||
    le_store (hdr + 28, freq << shift, 4);
 | 
			
		||||
    le_store (hdr + 32, 1 << shift, 2);
 | 
			
		||||
 | 
			
		||||
    wav->f = fopen (path, "wb");
 | 
			
		||||
    wav->f = qemu_fopen (path, "wb");
 | 
			
		||||
    if (!wav->f) {
 | 
			
		||||
        monitor_printf (mon, "Failed to open wave file `%s'\nReason: %s\n",
 | 
			
		||||
                        path, strerror (errno));
 | 
			
		||||
        g_free (wav);
 | 
			
		||||
        term_printf ("Failed to open wave file `%s'\nReason: %s\n",
 | 
			
		||||
                     path, strerror (errno));
 | 
			
		||||
        qemu_free (wav);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    wav->path = g_strdup (path);
 | 
			
		||||
    wav->path = qemu_strdup (path);
 | 
			
		||||
    wav->bits = bits;
 | 
			
		||||
    wav->nchannels = nchannels;
 | 
			
		||||
    wav->freq = freq;
 | 
			
		||||
 | 
			
		||||
    if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) {
 | 
			
		||||
        monitor_printf (mon, "Failed to write header\nReason: %s\n",
 | 
			
		||||
                        strerror (errno));
 | 
			
		||||
        goto error_free;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_put_buffer (wav->f, hdr, sizeof (hdr));
 | 
			
		||||
 | 
			
		||||
    cap = AUD_add_capture (&as, &ops, wav);
 | 
			
		||||
    cap = AUD_add_capture (NULL, &as, &ops, wav);
 | 
			
		||||
    if (!cap) {
 | 
			
		||||
        monitor_printf (mon, "Failed to add audio capture\n");
 | 
			
		||||
        goto error_free;
 | 
			
		||||
        term_printf ("Failed to add audio capture\n");
 | 
			
		||||
        qemu_free (wav->path);
 | 
			
		||||
        qemu_fclose (wav->f);
 | 
			
		||||
        qemu_free (wav);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    wav->cap = cap;
 | 
			
		||||
    s->opaque = wav;
 | 
			
		||||
    s->ops = wav_capture_ops;
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
error_free:
 | 
			
		||||
    g_free (wav->path);
 | 
			
		||||
    if (fclose (wav->f)) {
 | 
			
		||||
        monitor_printf (mon, "Failed to close wave file\nReason: %s\n",
 | 
			
		||||
                        strerror (errno));
 | 
			
		||||
    }
 | 
			
		||||
    g_free (wav);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 
 | 
			
		||||
@@ -1,717 +0,0 @@
 | 
			
		||||
/* public domain */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "sysemu/sysemu.h"
 | 
			
		||||
#include "audio.h"
 | 
			
		||||
 | 
			
		||||
#define AUDIO_CAP "winwave"
 | 
			
		||||
#include "audio_int.h"
 | 
			
		||||
 | 
			
		||||
#include <windows.h>
 | 
			
		||||
#include <mmsystem.h>
 | 
			
		||||
 | 
			
		||||
#include "audio_win_int.h"
 | 
			
		||||
 | 
			
		||||
static struct {
 | 
			
		||||
    int dac_headers;
 | 
			
		||||
    int dac_samples;
 | 
			
		||||
    int adc_headers;
 | 
			
		||||
    int adc_samples;
 | 
			
		||||
} conf = {
 | 
			
		||||
    .dac_headers = 4,
 | 
			
		||||
    .dac_samples = 1024,
 | 
			
		||||
    .adc_headers = 4,
 | 
			
		||||
    .adc_samples = 1024
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    HWVoiceOut hw;
 | 
			
		||||
    HWAVEOUT hwo;
 | 
			
		||||
    WAVEHDR *hdrs;
 | 
			
		||||
    HANDLE event;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    int avail;
 | 
			
		||||
    int pending;
 | 
			
		||||
    int curhdr;
 | 
			
		||||
    int paused;
 | 
			
		||||
    CRITICAL_SECTION crit_sect;
 | 
			
		||||
} WaveVoiceOut;
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    HWVoiceIn hw;
 | 
			
		||||
    HWAVEIN hwi;
 | 
			
		||||
    WAVEHDR *hdrs;
 | 
			
		||||
    HANDLE event;
 | 
			
		||||
    void *pcm_buf;
 | 
			
		||||
    int curhdr;
 | 
			
		||||
    int paused;
 | 
			
		||||
    int rpos;
 | 
			
		||||
    int avail;
 | 
			
		||||
    CRITICAL_SECTION crit_sect;
 | 
			
		||||
} WaveVoiceIn;
 | 
			
		||||
 | 
			
		||||
static void winwave_log_mmresult (MMRESULT mr)
 | 
			
		||||
{
 | 
			
		||||
    const char *str = "BUG";
 | 
			
		||||
 | 
			
		||||
    switch (mr) {
 | 
			
		||||
    case MMSYSERR_NOERROR:
 | 
			
		||||
        str = "Success";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case MMSYSERR_INVALHANDLE:
 | 
			
		||||
        str = "Specified device handle is invalid";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case MMSYSERR_BADDEVICEID:
 | 
			
		||||
        str = "Specified device id is out of range";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case MMSYSERR_NODRIVER:
 | 
			
		||||
        str = "No device driver is present";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case MMSYSERR_NOMEM:
 | 
			
		||||
        str = "Unable to allocate or lock memory";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case WAVERR_SYNC:
 | 
			
		||||
        str = "Device is synchronous but waveOutOpen was called "
 | 
			
		||||
            "without using the WINWAVE_ALLOWSYNC flag";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case WAVERR_UNPREPARED:
 | 
			
		||||
        str = "The data block pointed to by the pwh parameter "
 | 
			
		||||
            "hasn't been prepared";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case WAVERR_STILLPLAYING:
 | 
			
		||||
        str = "There are still buffers in the queue";
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("Reason: Unknown (MMRESULT %#x)\n", mr);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    dolog ("Reason: %s\n", str);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void GCC_FMT_ATTR (2, 3) winwave_logerr (
 | 
			
		||||
    MMRESULT mr,
 | 
			
		||||
    const char *fmt,
 | 
			
		||||
    ...
 | 
			
		||||
    )
 | 
			
		||||
{
 | 
			
		||||
    va_list ap;
 | 
			
		||||
 | 
			
		||||
    va_start (ap, fmt);
 | 
			
		||||
    AUD_vlog (AUDIO_CAP, fmt, ap);
 | 
			
		||||
    va_end (ap);
 | 
			
		||||
 | 
			
		||||
    AUD_log (NULL, " failed\n");
 | 
			
		||||
    winwave_log_mmresult (mr);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_anal_close_out (WaveVoiceOut *wave)
 | 
			
		||||
{
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
 | 
			
		||||
    mr = waveOutClose (wave->hwo);
 | 
			
		||||
    if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
        winwave_logerr (mr, "waveOutClose");
 | 
			
		||||
    }
 | 
			
		||||
    wave->hwo = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void CALLBACK winwave_callback_out (
 | 
			
		||||
    HWAVEOUT hwo,
 | 
			
		||||
    UINT msg,
 | 
			
		||||
    DWORD_PTR dwInstance,
 | 
			
		||||
    DWORD_PTR dwParam1,
 | 
			
		||||
    DWORD_PTR dwParam2
 | 
			
		||||
    )
 | 
			
		||||
{
 | 
			
		||||
    WaveVoiceOut *wave = (WaveVoiceOut *) dwInstance;
 | 
			
		||||
 | 
			
		||||
    switch (msg) {
 | 
			
		||||
    case WOM_DONE:
 | 
			
		||||
        {
 | 
			
		||||
            WAVEHDR *h = (WAVEHDR *) dwParam1;
 | 
			
		||||
            if (!h->dwUser) {
 | 
			
		||||
                h->dwUser = 1;
 | 
			
		||||
                EnterCriticalSection (&wave->crit_sect);
 | 
			
		||||
                {
 | 
			
		||||
                    wave->avail += conf.dac_samples;
 | 
			
		||||
                }
 | 
			
		||||
                LeaveCriticalSection (&wave->crit_sect);
 | 
			
		||||
                if (wave->hw.poll_mode) {
 | 
			
		||||
                    if (!SetEvent (wave->event)) {
 | 
			
		||||
                        dolog ("DAC SetEvent failed %lx\n", GetLastError ());
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case WOM_CLOSE:
 | 
			
		||||
    case WOM_OPEN:
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("unknown wave out callback msg %x\n", msg);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_init_out (HWVoiceOut *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
    int err;
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
    WAVEFORMATEX wfx;
 | 
			
		||||
    WaveVoiceOut *wave;
 | 
			
		||||
 | 
			
		||||
    wave = (WaveVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    InitializeCriticalSection (&wave->crit_sect);
 | 
			
		||||
 | 
			
		||||
    err = waveformat_from_audio_settings (&wfx, as);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        goto err0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    mr = waveOutOpen (&wave->hwo, WAVE_MAPPER, &wfx,
 | 
			
		||||
                      (DWORD_PTR) winwave_callback_out,
 | 
			
		||||
                      (DWORD_PTR) wave, CALLBACK_FUNCTION);
 | 
			
		||||
    if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
        winwave_logerr (mr, "waveOutOpen");
 | 
			
		||||
        goto err1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    wave->hdrs = audio_calloc (AUDIO_FUNC, conf.dac_headers,
 | 
			
		||||
                               sizeof (*wave->hdrs));
 | 
			
		||||
    if (!wave->hdrs) {
 | 
			
		||||
        goto err2;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, as);
 | 
			
		||||
    hw->samples = conf.dac_samples * conf.dac_headers;
 | 
			
		||||
    wave->avail = hw->samples;
 | 
			
		||||
 | 
			
		||||
    wave->pcm_buf = audio_calloc (AUDIO_FUNC, conf.dac_samples,
 | 
			
		||||
                                  conf.dac_headers << hw->info.shift);
 | 
			
		||||
    if (!wave->pcm_buf) {
 | 
			
		||||
        goto err3;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < conf.dac_headers; ++i) {
 | 
			
		||||
        WAVEHDR *h = &wave->hdrs[i];
 | 
			
		||||
 | 
			
		||||
        h->dwUser = 0;
 | 
			
		||||
        h->dwBufferLength = conf.dac_samples << hw->info.shift;
 | 
			
		||||
        h->lpData = advance (wave->pcm_buf, i * h->dwBufferLength);
 | 
			
		||||
        h->dwFlags = 0;
 | 
			
		||||
 | 
			
		||||
        mr = waveOutPrepareHeader (wave->hwo, h, sizeof (*h));
 | 
			
		||||
        if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
            winwave_logerr (mr, "waveOutPrepareHeader(%d)", i);
 | 
			
		||||
            goto err4;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 err4:
 | 
			
		||||
    g_free (wave->pcm_buf);
 | 
			
		||||
 err3:
 | 
			
		||||
    g_free (wave->hdrs);
 | 
			
		||||
 err2:
 | 
			
		||||
    winwave_anal_close_out (wave);
 | 
			
		||||
 err1:
 | 
			
		||||
 err0:
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_write (SWVoiceOut *sw, void *buf, int len)
 | 
			
		||||
{
 | 
			
		||||
    return audio_pcm_sw_write (sw, buf, len);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_run_out (HWVoiceOut *hw, int live)
 | 
			
		||||
{
 | 
			
		||||
    WaveVoiceOut *wave = (WaveVoiceOut *) hw;
 | 
			
		||||
    int decr;
 | 
			
		||||
    int doreset;
 | 
			
		||||
 | 
			
		||||
    EnterCriticalSection (&wave->crit_sect);
 | 
			
		||||
    {
 | 
			
		||||
        decr = audio_MIN (live, wave->avail);
 | 
			
		||||
        decr = audio_pcm_hw_clip_out (hw, wave->pcm_buf, decr, wave->pending);
 | 
			
		||||
        wave->pending += decr;
 | 
			
		||||
        wave->avail -= decr;
 | 
			
		||||
    }
 | 
			
		||||
    LeaveCriticalSection (&wave->crit_sect);
 | 
			
		||||
 | 
			
		||||
    doreset = hw->poll_mode && (wave->pending >= conf.dac_samples);
 | 
			
		||||
    if (doreset && !ResetEvent (wave->event)) {
 | 
			
		||||
        dolog ("DAC ResetEvent failed %lx\n", GetLastError ());
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (wave->pending >= conf.dac_samples) {
 | 
			
		||||
        MMRESULT mr;
 | 
			
		||||
        WAVEHDR *h = &wave->hdrs[wave->curhdr];
 | 
			
		||||
 | 
			
		||||
        h->dwUser = 0;
 | 
			
		||||
        mr = waveOutWrite (wave->hwo, h, sizeof (*h));
 | 
			
		||||
        if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
            winwave_logerr (mr, "waveOutWrite(%d)", wave->curhdr);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        wave->pending -= conf.dac_samples;
 | 
			
		||||
        wave->curhdr = (wave->curhdr + 1) % conf.dac_headers;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return decr;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_poll (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    (void) opaque;
 | 
			
		||||
    audio_run ("winwave_poll");
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_fini_out (HWVoiceOut *hw)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
    WaveVoiceOut *wave = (WaveVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    mr = waveOutReset (wave->hwo);
 | 
			
		||||
    if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
        winwave_logerr (mr, "waveOutReset");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < conf.dac_headers; ++i) {
 | 
			
		||||
        mr = waveOutUnprepareHeader (wave->hwo, &wave->hdrs[i],
 | 
			
		||||
                                     sizeof (wave->hdrs[i]));
 | 
			
		||||
        if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
            winwave_logerr (mr, "waveOutUnprepareHeader(%d)", i);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    winwave_anal_close_out (wave);
 | 
			
		||||
 | 
			
		||||
    if (wave->event) {
 | 
			
		||||
        qemu_del_wait_object (wave->event, winwave_poll, wave);
 | 
			
		||||
        if (!CloseHandle (wave->event)) {
 | 
			
		||||
            dolog ("DAC CloseHandle failed %lx\n", GetLastError ());
 | 
			
		||||
        }
 | 
			
		||||
        wave->event = NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free (wave->pcm_buf);
 | 
			
		||||
    wave->pcm_buf = NULL;
 | 
			
		||||
 | 
			
		||||
    g_free (wave->hdrs);
 | 
			
		||||
    wave->hdrs = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_ctl_out (HWVoiceOut *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
    WaveVoiceOut *wave = (WaveVoiceOut *) hw;
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        {
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            int poll_mode;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            poll_mode = va_arg (ap, int);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            if (poll_mode && !wave->event) {
 | 
			
		||||
                wave->event = CreateEvent (NULL, TRUE, TRUE, NULL);
 | 
			
		||||
                if (!wave->event) {
 | 
			
		||||
                    dolog ("DAC CreateEvent: %lx, poll mode will be disabled\n",
 | 
			
		||||
                           GetLastError ());
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (wave->event) {
 | 
			
		||||
                int ret;
 | 
			
		||||
 | 
			
		||||
                ret = qemu_add_wait_object (wave->event, winwave_poll, wave);
 | 
			
		||||
                hw->poll_mode = (ret == 0);
 | 
			
		||||
            }
 | 
			
		||||
            else {
 | 
			
		||||
                hw->poll_mode = 0;
 | 
			
		||||
            }
 | 
			
		||||
            wave->paused = 0;
 | 
			
		||||
        }
 | 
			
		||||
        return 0;
 | 
			
		||||
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        if (!wave->paused) {
 | 
			
		||||
            mr = waveOutReset (wave->hwo);
 | 
			
		||||
            if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
                winwave_logerr (mr, "waveOutReset");
 | 
			
		||||
            }
 | 
			
		||||
            else {
 | 
			
		||||
                wave->paused = 1;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        if (wave->event) {
 | 
			
		||||
            qemu_del_wait_object (wave->event, winwave_poll, wave);
 | 
			
		||||
        }
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_anal_close_in (WaveVoiceIn *wave)
 | 
			
		||||
{
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
 | 
			
		||||
    mr = waveInClose (wave->hwi);
 | 
			
		||||
    if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
        winwave_logerr (mr, "waveInClose");
 | 
			
		||||
    }
 | 
			
		||||
    wave->hwi = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void CALLBACK winwave_callback_in (
 | 
			
		||||
    HWAVEIN *hwi,
 | 
			
		||||
    UINT msg,
 | 
			
		||||
    DWORD_PTR dwInstance,
 | 
			
		||||
    DWORD_PTR dwParam1,
 | 
			
		||||
    DWORD_PTR dwParam2
 | 
			
		||||
    )
 | 
			
		||||
{
 | 
			
		||||
    WaveVoiceIn *wave = (WaveVoiceIn *) dwInstance;
 | 
			
		||||
 | 
			
		||||
    switch (msg) {
 | 
			
		||||
    case WIM_DATA:
 | 
			
		||||
        {
 | 
			
		||||
            WAVEHDR *h = (WAVEHDR *) dwParam1;
 | 
			
		||||
            if (!h->dwUser) {
 | 
			
		||||
                h->dwUser = 1;
 | 
			
		||||
                EnterCriticalSection (&wave->crit_sect);
 | 
			
		||||
                {
 | 
			
		||||
                    wave->avail += conf.adc_samples;
 | 
			
		||||
                }
 | 
			
		||||
                LeaveCriticalSection (&wave->crit_sect);
 | 
			
		||||
                if (wave->hw.poll_mode) {
 | 
			
		||||
                    if (!SetEvent (wave->event)) {
 | 
			
		||||
                        dolog ("ADC SetEvent failed %lx\n", GetLastError ());
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case WIM_CLOSE:
 | 
			
		||||
    case WIM_OPEN:
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    default:
 | 
			
		||||
        dolog ("unknown wave in callback msg %x\n", msg);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_add_buffers (WaveVoiceIn *wave, int samples)
 | 
			
		||||
{
 | 
			
		||||
    int doreset;
 | 
			
		||||
 | 
			
		||||
    doreset = wave->hw.poll_mode && (samples >= conf.adc_samples);
 | 
			
		||||
    if (doreset && !ResetEvent (wave->event)) {
 | 
			
		||||
        dolog ("ADC ResetEvent failed %lx\n", GetLastError ());
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (samples >= conf.adc_samples) {
 | 
			
		||||
        MMRESULT mr;
 | 
			
		||||
        WAVEHDR *h = &wave->hdrs[wave->curhdr];
 | 
			
		||||
 | 
			
		||||
        h->dwUser = 0;
 | 
			
		||||
        mr = waveInAddBuffer (wave->hwi, h, sizeof (*h));
 | 
			
		||||
        if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
            winwave_logerr (mr, "waveInAddBuffer(%d)", wave->curhdr);
 | 
			
		||||
        }
 | 
			
		||||
        wave->curhdr = (wave->curhdr + 1) % conf.adc_headers;
 | 
			
		||||
        samples -= conf.adc_samples;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_init_in (HWVoiceIn *hw, struct audsettings *as)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
    int err;
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
    WAVEFORMATEX wfx;
 | 
			
		||||
    WaveVoiceIn *wave;
 | 
			
		||||
 | 
			
		||||
    wave = (WaveVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    InitializeCriticalSection (&wave->crit_sect);
 | 
			
		||||
 | 
			
		||||
    err = waveformat_from_audio_settings (&wfx, as);
 | 
			
		||||
    if (err) {
 | 
			
		||||
        goto err0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    mr = waveInOpen (&wave->hwi, WAVE_MAPPER, &wfx,
 | 
			
		||||
                     (DWORD_PTR) winwave_callback_in,
 | 
			
		||||
                     (DWORD_PTR) wave, CALLBACK_FUNCTION);
 | 
			
		||||
    if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
        winwave_logerr (mr, "waveInOpen");
 | 
			
		||||
        goto err1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    wave->hdrs = audio_calloc (AUDIO_FUNC, conf.dac_headers,
 | 
			
		||||
                               sizeof (*wave->hdrs));
 | 
			
		||||
    if (!wave->hdrs) {
 | 
			
		||||
        goto err2;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    audio_pcm_init_info (&hw->info, as);
 | 
			
		||||
    hw->samples = conf.adc_samples * conf.adc_headers;
 | 
			
		||||
    wave->avail = 0;
 | 
			
		||||
 | 
			
		||||
    wave->pcm_buf = audio_calloc (AUDIO_FUNC, conf.adc_samples,
 | 
			
		||||
                                  conf.adc_headers << hw->info.shift);
 | 
			
		||||
    if (!wave->pcm_buf) {
 | 
			
		||||
        goto err3;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < conf.adc_headers; ++i) {
 | 
			
		||||
        WAVEHDR *h = &wave->hdrs[i];
 | 
			
		||||
 | 
			
		||||
        h->dwUser = 0;
 | 
			
		||||
        h->dwBufferLength = conf.adc_samples << hw->info.shift;
 | 
			
		||||
        h->lpData = advance (wave->pcm_buf, i * h->dwBufferLength);
 | 
			
		||||
        h->dwFlags = 0;
 | 
			
		||||
 | 
			
		||||
        mr = waveInPrepareHeader (wave->hwi, h, sizeof (*h));
 | 
			
		||||
        if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
            winwave_logerr (mr, "waveInPrepareHeader(%d)", i);
 | 
			
		||||
            goto err4;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    wave->paused = 1;
 | 
			
		||||
    winwave_add_buffers (wave, hw->samples);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 err4:
 | 
			
		||||
    g_free (wave->pcm_buf);
 | 
			
		||||
 err3:
 | 
			
		||||
    g_free (wave->hdrs);
 | 
			
		||||
 err2:
 | 
			
		||||
    winwave_anal_close_in (wave);
 | 
			
		||||
 err1:
 | 
			
		||||
 err0:
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_fini_in (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
    WaveVoiceIn *wave = (WaveVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    mr = waveInReset (wave->hwi);
 | 
			
		||||
    if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
        winwave_logerr (mr, "waveInReset");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < conf.adc_headers; ++i) {
 | 
			
		||||
        mr = waveInUnprepareHeader (wave->hwi, &wave->hdrs[i],
 | 
			
		||||
                                     sizeof (wave->hdrs[i]));
 | 
			
		||||
        if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
            winwave_logerr (mr, "waveInUnprepareHeader(%d)", i);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    winwave_anal_close_in (wave);
 | 
			
		||||
 | 
			
		||||
    if (wave->event) {
 | 
			
		||||
        qemu_del_wait_object (wave->event, winwave_poll, wave);
 | 
			
		||||
        if (!CloseHandle (wave->event)) {
 | 
			
		||||
            dolog ("ADC CloseHandle failed %lx\n", GetLastError ());
 | 
			
		||||
        }
 | 
			
		||||
        wave->event = NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free (wave->pcm_buf);
 | 
			
		||||
    wave->pcm_buf = NULL;
 | 
			
		||||
 | 
			
		||||
    g_free (wave->hdrs);
 | 
			
		||||
    wave->hdrs = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_run_in (HWVoiceIn *hw)
 | 
			
		||||
{
 | 
			
		||||
    WaveVoiceIn *wave = (WaveVoiceIn *) hw;
 | 
			
		||||
    int live = audio_pcm_hw_get_live_in (hw);
 | 
			
		||||
    int dead = hw->samples - live;
 | 
			
		||||
    int decr, ret;
 | 
			
		||||
 | 
			
		||||
    if (!dead) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    EnterCriticalSection (&wave->crit_sect);
 | 
			
		||||
    {
 | 
			
		||||
        decr = audio_MIN (dead, wave->avail);
 | 
			
		||||
        wave->avail -= decr;
 | 
			
		||||
    }
 | 
			
		||||
    LeaveCriticalSection (&wave->crit_sect);
 | 
			
		||||
 | 
			
		||||
    ret = decr;
 | 
			
		||||
    while (decr) {
 | 
			
		||||
        int left = hw->samples - hw->wpos;
 | 
			
		||||
        int conv = audio_MIN (left, decr);
 | 
			
		||||
        hw->conv (hw->conv_buf + hw->wpos,
 | 
			
		||||
                  advance (wave->pcm_buf, wave->rpos << hw->info.shift),
 | 
			
		||||
                  conv);
 | 
			
		||||
 | 
			
		||||
        wave->rpos = (wave->rpos + conv) % hw->samples;
 | 
			
		||||
        hw->wpos = (hw->wpos + conv) % hw->samples;
 | 
			
		||||
        decr -= conv;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    winwave_add_buffers (wave, ret);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_read (SWVoiceIn *sw, void *buf, int size)
 | 
			
		||||
{
 | 
			
		||||
    return audio_pcm_sw_read (sw, buf, size);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int winwave_ctl_in (HWVoiceIn *hw, int cmd, ...)
 | 
			
		||||
{
 | 
			
		||||
    MMRESULT mr;
 | 
			
		||||
    WaveVoiceIn *wave = (WaveVoiceIn *) hw;
 | 
			
		||||
 | 
			
		||||
    switch (cmd) {
 | 
			
		||||
    case VOICE_ENABLE:
 | 
			
		||||
        {
 | 
			
		||||
            va_list ap;
 | 
			
		||||
            int poll_mode;
 | 
			
		||||
 | 
			
		||||
            va_start (ap, cmd);
 | 
			
		||||
            poll_mode = va_arg (ap, int);
 | 
			
		||||
            va_end (ap);
 | 
			
		||||
 | 
			
		||||
            if (poll_mode && !wave->event) {
 | 
			
		||||
                wave->event = CreateEvent (NULL, TRUE, TRUE, NULL);
 | 
			
		||||
                if (!wave->event) {
 | 
			
		||||
                    dolog ("ADC CreateEvent: %lx, poll mode will be disabled\n",
 | 
			
		||||
                           GetLastError ());
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (wave->event) {
 | 
			
		||||
                int ret;
 | 
			
		||||
 | 
			
		||||
                ret = qemu_add_wait_object (wave->event, winwave_poll, wave);
 | 
			
		||||
                hw->poll_mode = (ret == 0);
 | 
			
		||||
            }
 | 
			
		||||
            else {
 | 
			
		||||
                hw->poll_mode = 0;
 | 
			
		||||
            }
 | 
			
		||||
            if (wave->paused) {
 | 
			
		||||
                mr = waveInStart (wave->hwi);
 | 
			
		||||
                if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
                    winwave_logerr (mr, "waveInStart");
 | 
			
		||||
                }
 | 
			
		||||
                wave->paused = 0;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        return 0;
 | 
			
		||||
 | 
			
		||||
    case VOICE_DISABLE:
 | 
			
		||||
        if (!wave->paused) {
 | 
			
		||||
            mr = waveInStop (wave->hwi);
 | 
			
		||||
            if (mr != MMSYSERR_NOERROR) {
 | 
			
		||||
                winwave_logerr (mr, "waveInStop");
 | 
			
		||||
            }
 | 
			
		||||
            else {
 | 
			
		||||
                wave->paused = 1;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        if (wave->event) {
 | 
			
		||||
            qemu_del_wait_object (wave->event, winwave_poll, wave);
 | 
			
		||||
        }
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void *winwave_audio_init (void)
 | 
			
		||||
{
 | 
			
		||||
    return &conf;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void winwave_audio_fini (void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    (void) opaque;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct audio_option winwave_options[] = {
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "DAC_HEADERS",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.dac_headers,
 | 
			
		||||
        .descr       = "DAC number of headers",
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "DAC_SAMPLES",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.dac_samples,
 | 
			
		||||
        .descr       = "DAC number of samples per header",
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "ADC_HEADERS",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.adc_headers,
 | 
			
		||||
        .descr       = "ADC number of headers",
 | 
			
		||||
    },
 | 
			
		||||
    {
 | 
			
		||||
        .name        = "ADC_SAMPLES",
 | 
			
		||||
        .tag         = AUD_OPT_INT,
 | 
			
		||||
        .valp        = &conf.adc_samples,
 | 
			
		||||
        .descr       = "ADC number of samples per header",
 | 
			
		||||
    },
 | 
			
		||||
    { /* End of list */ }
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static struct audio_pcm_ops winwave_pcm_ops = {
 | 
			
		||||
    .init_out = winwave_init_out,
 | 
			
		||||
    .fini_out = winwave_fini_out,
 | 
			
		||||
    .run_out  = winwave_run_out,
 | 
			
		||||
    .write    = winwave_write,
 | 
			
		||||
    .ctl_out  = winwave_ctl_out,
 | 
			
		||||
    .init_in  = winwave_init_in,
 | 
			
		||||
    .fini_in  = winwave_fini_in,
 | 
			
		||||
    .run_in   = winwave_run_in,
 | 
			
		||||
    .read     = winwave_read,
 | 
			
		||||
    .ctl_in   = winwave_ctl_in
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct audio_driver winwave_audio_driver = {
 | 
			
		||||
    .name           = "winwave",
 | 
			
		||||
    .descr          = "Windows Waveform Audio http://msdn.microsoft.com",
 | 
			
		||||
    .options        = winwave_options,
 | 
			
		||||
    .init           = winwave_audio_init,
 | 
			
		||||
    .fini           = winwave_audio_fini,
 | 
			
		||||
    .pcm_ops        = &winwave_pcm_ops,
 | 
			
		||||
    .can_be_default = 1,
 | 
			
		||||
    .max_voices_out = INT_MAX,
 | 
			
		||||
    .max_voices_in  = INT_MAX,
 | 
			
		||||
    .voice_size_out = sizeof (WaveVoiceOut),
 | 
			
		||||
    .voice_size_in  = sizeof (WaveVoiceIn)
 | 
			
		||||
};
 | 
			
		||||
@@ -1,11 +0,0 @@
 | 
			
		||||
common-obj-y += rng.o rng-egd.o
 | 
			
		||||
common-obj-$(CONFIG_POSIX) += rng-random.o
 | 
			
		||||
 | 
			
		||||
common-obj-y += msmouse.o
 | 
			
		||||
common-obj-$(CONFIG_BRLAPI) += baum.o
 | 
			
		||||
baum.o-cflags := $(SDL_CFLAGS)
 | 
			
		||||
 | 
			
		||||
common-obj-$(CONFIG_TPM) += tpm.o
 | 
			
		||||
 | 
			
		||||
common-obj-y += hostmem.o hostmem-ram.o
 | 
			
		||||
common-obj-$(CONFIG_LINUX) += hostmem-file.o
 | 
			
		||||
@@ -1,134 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Host Memory Backend for hugetlbfs
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2013-2014 Red Hat Inc
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *   Paolo Bonzini <pbonzini@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "sysemu/hostmem.h"
 | 
			
		||||
#include "sysemu/sysemu.h"
 | 
			
		||||
#include "qom/object_interfaces.h"
 | 
			
		||||
 | 
			
		||||
/* hostmem-file.c */
 | 
			
		||||
/**
 | 
			
		||||
 * @TYPE_MEMORY_BACKEND_FILE:
 | 
			
		||||
 * name of backend that uses mmap on a file descriptor
 | 
			
		||||
 */
 | 
			
		||||
#define TYPE_MEMORY_BACKEND_FILE "memory-backend-file"
 | 
			
		||||
 | 
			
		||||
#define MEMORY_BACKEND_FILE(obj) \
 | 
			
		||||
    OBJECT_CHECK(HostMemoryBackendFile, (obj), TYPE_MEMORY_BACKEND_FILE)
 | 
			
		||||
 | 
			
		||||
typedef struct HostMemoryBackendFile HostMemoryBackendFile;
 | 
			
		||||
 | 
			
		||||
struct HostMemoryBackendFile {
 | 
			
		||||
    HostMemoryBackend parent_obj;
 | 
			
		||||
 | 
			
		||||
    bool share;
 | 
			
		||||
    char *mem_path;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
file_backend_memory_alloc(HostMemoryBackend *backend, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackendFile *fb = MEMORY_BACKEND_FILE(backend);
 | 
			
		||||
 | 
			
		||||
    if (!backend->size) {
 | 
			
		||||
        error_setg(errp, "can't create backend with size 0");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    if (!fb->mem_path) {
 | 
			
		||||
        error_setg(errp, "mem_path property not set");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
#ifndef CONFIG_LINUX
 | 
			
		||||
    error_setg(errp, "-mem-path not supported on this host");
 | 
			
		||||
#else
 | 
			
		||||
    if (!memory_region_size(&backend->mr)) {
 | 
			
		||||
        backend->force_prealloc = mem_prealloc;
 | 
			
		||||
        memory_region_init_ram_from_file(&backend->mr, OBJECT(backend),
 | 
			
		||||
                                 object_get_canonical_path(OBJECT(backend)),
 | 
			
		||||
                                 backend->size, fb->share,
 | 
			
		||||
                                 fb->mem_path, errp);
 | 
			
		||||
    }
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
file_backend_class_init(ObjectClass *oc, void *data)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackendClass *bc = MEMORY_BACKEND_CLASS(oc);
 | 
			
		||||
 | 
			
		||||
    bc->alloc = file_backend_memory_alloc;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static char *get_mem_path(Object *o, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackendFile *fb = MEMORY_BACKEND_FILE(o);
 | 
			
		||||
 | 
			
		||||
    return g_strdup(fb->mem_path);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void set_mem_path(Object *o, const char *str, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(o);
 | 
			
		||||
    HostMemoryBackendFile *fb = MEMORY_BACKEND_FILE(o);
 | 
			
		||||
 | 
			
		||||
    if (memory_region_size(&backend->mr)) {
 | 
			
		||||
        error_setg(errp, "cannot change property value");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    if (fb->mem_path) {
 | 
			
		||||
        g_free(fb->mem_path);
 | 
			
		||||
    }
 | 
			
		||||
    fb->mem_path = g_strdup(str);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool file_memory_backend_get_share(Object *o, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackendFile *fb = MEMORY_BACKEND_FILE(o);
 | 
			
		||||
 | 
			
		||||
    return fb->share;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void file_memory_backend_set_share(Object *o, bool value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(o);
 | 
			
		||||
    HostMemoryBackendFile *fb = MEMORY_BACKEND_FILE(o);
 | 
			
		||||
 | 
			
		||||
    if (memory_region_size(&backend->mr)) {
 | 
			
		||||
        error_setg(errp, "cannot change property value");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    fb->share = value;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
file_backend_instance_init(Object *o)
 | 
			
		||||
{
 | 
			
		||||
    object_property_add_bool(o, "share",
 | 
			
		||||
                        file_memory_backend_get_share,
 | 
			
		||||
                        file_memory_backend_set_share, NULL);
 | 
			
		||||
    object_property_add_str(o, "mem-path", get_mem_path,
 | 
			
		||||
                            set_mem_path, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo file_backend_info = {
 | 
			
		||||
    .name = TYPE_MEMORY_BACKEND_FILE,
 | 
			
		||||
    .parent = TYPE_MEMORY_BACKEND,
 | 
			
		||||
    .class_init = file_backend_class_init,
 | 
			
		||||
    .instance_init = file_backend_instance_init,
 | 
			
		||||
    .instance_size = sizeof(HostMemoryBackendFile),
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&file_backend_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
@@ -1,53 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Host Memory Backend
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2013-2014 Red Hat Inc
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *   Igor Mammedov <imammedo@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
#include "sysemu/hostmem.h"
 | 
			
		||||
#include "qom/object_interfaces.h"
 | 
			
		||||
 | 
			
		||||
#define TYPE_MEMORY_BACKEND_RAM "memory-backend-ram"
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
ram_backend_memory_alloc(HostMemoryBackend *backend, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    char *path;
 | 
			
		||||
 | 
			
		||||
    if (!backend->size) {
 | 
			
		||||
        error_setg(errp, "can't create backend with size 0");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    path = object_get_canonical_path_component(OBJECT(backend));
 | 
			
		||||
    memory_region_init_ram(&backend->mr, OBJECT(backend), path,
 | 
			
		||||
                           backend->size);
 | 
			
		||||
    g_free(path);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
ram_backend_class_init(ObjectClass *oc, void *data)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackendClass *bc = MEMORY_BACKEND_CLASS(oc);
 | 
			
		||||
 | 
			
		||||
    bc->alloc = ram_backend_memory_alloc;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo ram_backend_info = {
 | 
			
		||||
    .name = TYPE_MEMORY_BACKEND_RAM,
 | 
			
		||||
    .parent = TYPE_MEMORY_BACKEND,
 | 
			
		||||
    .class_init = ram_backend_class_init,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&ram_backend_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
@@ -1,375 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Host Memory Backend
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2013-2014 Red Hat Inc
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *   Igor Mammedov <imammedo@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
#include "sysemu/hostmem.h"
 | 
			
		||||
#include "qapi/visitor.h"
 | 
			
		||||
#include "qapi-types.h"
 | 
			
		||||
#include "qapi-visit.h"
 | 
			
		||||
#include "qapi/qmp/qerror.h"
 | 
			
		||||
#include "qemu/config-file.h"
 | 
			
		||||
#include "qom/object_interfaces.h"
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_NUMA
 | 
			
		||||
#include <numaif.h>
 | 
			
		||||
QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_DEFAULT != MPOL_DEFAULT);
 | 
			
		||||
QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_PREFERRED != MPOL_PREFERRED);
 | 
			
		||||
QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_BIND != MPOL_BIND);
 | 
			
		||||
QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_INTERLEAVE != MPOL_INTERLEAVE);
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_get_size(Object *obj, Visitor *v, void *opaque,
 | 
			
		||||
                             const char *name, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
    uint64_t value = backend->size;
 | 
			
		||||
 | 
			
		||||
    visit_type_size(v, &value, name, errp);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_set_size(Object *obj, Visitor *v, void *opaque,
 | 
			
		||||
                             const char *name, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    uint64_t value;
 | 
			
		||||
 | 
			
		||||
    if (memory_region_size(&backend->mr)) {
 | 
			
		||||
        error_setg(&local_err, "cannot change property value");
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    visit_type_size(v, &value, name, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
    if (!value) {
 | 
			
		||||
        error_setg(&local_err, "Property '%s.%s' doesn't take value '%"
 | 
			
		||||
                   PRIu64 "'", object_get_typename(obj), name, value);
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
    backend->size = value;
 | 
			
		||||
out:
 | 
			
		||||
    error_propagate(errp, local_err);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_get_host_nodes(Object *obj, Visitor *v, void *opaque,
 | 
			
		||||
                                   const char *name, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
    uint16List *host_nodes = NULL;
 | 
			
		||||
    uint16List **node = &host_nodes;
 | 
			
		||||
    unsigned long value;
 | 
			
		||||
 | 
			
		||||
    value = find_first_bit(backend->host_nodes, MAX_NODES);
 | 
			
		||||
    if (value == MAX_NODES) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *node = g_malloc0(sizeof(**node));
 | 
			
		||||
    (*node)->value = value;
 | 
			
		||||
    node = &(*node)->next;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        value = find_next_bit(backend->host_nodes, MAX_NODES, value + 1);
 | 
			
		||||
        if (value == MAX_NODES) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        *node = g_malloc0(sizeof(**node));
 | 
			
		||||
        (*node)->value = value;
 | 
			
		||||
        node = &(*node)->next;
 | 
			
		||||
    } while (true);
 | 
			
		||||
 | 
			
		||||
    visit_type_uint16List(v, &host_nodes, name, errp);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_set_host_nodes(Object *obj, Visitor *v, void *opaque,
 | 
			
		||||
                                   const char *name, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
#ifdef CONFIG_NUMA
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
    uint16List *l = NULL;
 | 
			
		||||
 | 
			
		||||
    visit_type_uint16List(v, &l, name, errp);
 | 
			
		||||
 | 
			
		||||
    while (l) {
 | 
			
		||||
        bitmap_set(backend->host_nodes, l->value, 1);
 | 
			
		||||
        l = l->next;
 | 
			
		||||
    }
 | 
			
		||||
#else
 | 
			
		||||
    error_setg(errp, "NUMA node binding are not supported by this QEMU");
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_get_policy(Object *obj, Visitor *v, void *opaque,
 | 
			
		||||
                               const char *name, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
    int policy = backend->policy;
 | 
			
		||||
 | 
			
		||||
    visit_type_enum(v, &policy, HostMemPolicy_lookup, NULL, name, errp);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_set_policy(Object *obj, Visitor *v, void *opaque,
 | 
			
		||||
                               const char *name, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
    int policy;
 | 
			
		||||
 | 
			
		||||
    visit_type_enum(v, &policy, HostMemPolicy_lookup, NULL, name, errp);
 | 
			
		||||
    backend->policy = policy;
 | 
			
		||||
 | 
			
		||||
#ifndef CONFIG_NUMA
 | 
			
		||||
    if (policy != HOST_MEM_POLICY_DEFAULT) {
 | 
			
		||||
        error_setg(errp, "NUMA policies are not supported by this QEMU");
 | 
			
		||||
    }
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool host_memory_backend_get_merge(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    return backend->merge;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void host_memory_backend_set_merge(Object *obj, bool value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    if (!memory_region_size(&backend->mr)) {
 | 
			
		||||
        backend->merge = value;
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (value != backend->merge) {
 | 
			
		||||
        void *ptr = memory_region_get_ram_ptr(&backend->mr);
 | 
			
		||||
        uint64_t sz = memory_region_size(&backend->mr);
 | 
			
		||||
 | 
			
		||||
        qemu_madvise(ptr, sz,
 | 
			
		||||
                     value ? QEMU_MADV_MERGEABLE : QEMU_MADV_UNMERGEABLE);
 | 
			
		||||
        backend->merge = value;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool host_memory_backend_get_dump(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    return backend->dump;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void host_memory_backend_set_dump(Object *obj, bool value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    if (!memory_region_size(&backend->mr)) {
 | 
			
		||||
        backend->dump = value;
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (value != backend->dump) {
 | 
			
		||||
        void *ptr = memory_region_get_ram_ptr(&backend->mr);
 | 
			
		||||
        uint64_t sz = memory_region_size(&backend->mr);
 | 
			
		||||
 | 
			
		||||
        qemu_madvise(ptr, sz,
 | 
			
		||||
                     value ? QEMU_MADV_DODUMP : QEMU_MADV_DONTDUMP);
 | 
			
		||||
        backend->dump = value;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool host_memory_backend_get_prealloc(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    return backend->prealloc || backend->force_prealloc;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void host_memory_backend_set_prealloc(Object *obj, bool value,
 | 
			
		||||
                                             Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    if (backend->force_prealloc) {
 | 
			
		||||
        if (value) {
 | 
			
		||||
            error_setg(errp,
 | 
			
		||||
                       "remove -mem-prealloc to use the prealloc property");
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!memory_region_size(&backend->mr)) {
 | 
			
		||||
        backend->prealloc = value;
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (value && !backend->prealloc) {
 | 
			
		||||
        int fd = memory_region_get_fd(&backend->mr);
 | 
			
		||||
        void *ptr = memory_region_get_ram_ptr(&backend->mr);
 | 
			
		||||
        uint64_t sz = memory_region_size(&backend->mr);
 | 
			
		||||
 | 
			
		||||
        os_mem_prealloc(fd, ptr, sz);
 | 
			
		||||
        backend->prealloc = true;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void host_memory_backend_init(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    backend->merge = qemu_opt_get_bool(qemu_get_machine_opts(),
 | 
			
		||||
                                       "mem-merge", true);
 | 
			
		||||
    backend->dump = qemu_opt_get_bool(qemu_get_machine_opts(),
 | 
			
		||||
                                      "dump-guest-core", true);
 | 
			
		||||
    backend->prealloc = mem_prealloc;
 | 
			
		||||
 | 
			
		||||
    object_property_add_bool(obj, "merge",
 | 
			
		||||
                        host_memory_backend_get_merge,
 | 
			
		||||
                        host_memory_backend_set_merge, NULL);
 | 
			
		||||
    object_property_add_bool(obj, "dump",
 | 
			
		||||
                        host_memory_backend_get_dump,
 | 
			
		||||
                        host_memory_backend_set_dump, NULL);
 | 
			
		||||
    object_property_add_bool(obj, "prealloc",
 | 
			
		||||
                        host_memory_backend_get_prealloc,
 | 
			
		||||
                        host_memory_backend_set_prealloc, NULL);
 | 
			
		||||
    object_property_add(obj, "size", "int",
 | 
			
		||||
                        host_memory_backend_get_size,
 | 
			
		||||
                        host_memory_backend_set_size, NULL, NULL, NULL);
 | 
			
		||||
    object_property_add(obj, "host-nodes", "int",
 | 
			
		||||
                        host_memory_backend_get_host_nodes,
 | 
			
		||||
                        host_memory_backend_set_host_nodes, NULL, NULL, NULL);
 | 
			
		||||
    object_property_add(obj, "policy", "str",
 | 
			
		||||
                        host_memory_backend_get_policy,
 | 
			
		||||
                        host_memory_backend_set_policy, NULL, NULL, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void host_memory_backend_finalize(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    if (memory_region_size(&backend->mr)) {
 | 
			
		||||
        memory_region_destroy(&backend->mr);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
MemoryRegion *
 | 
			
		||||
host_memory_backend_get_memory(HostMemoryBackend *backend, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    return memory_region_size(&backend->mr) ? &backend->mr : NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_memory_complete(UserCreatable *uc, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    HostMemoryBackend *backend = MEMORY_BACKEND(uc);
 | 
			
		||||
    HostMemoryBackendClass *bc = MEMORY_BACKEND_GET_CLASS(uc);
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    void *ptr;
 | 
			
		||||
    uint64_t sz;
 | 
			
		||||
 | 
			
		||||
    if (bc->alloc) {
 | 
			
		||||
        bc->alloc(backend, &local_err);
 | 
			
		||||
        if (local_err) {
 | 
			
		||||
            error_propagate(errp, local_err);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        ptr = memory_region_get_ram_ptr(&backend->mr);
 | 
			
		||||
        sz = memory_region_size(&backend->mr);
 | 
			
		||||
 | 
			
		||||
        if (backend->merge) {
 | 
			
		||||
            qemu_madvise(ptr, sz, QEMU_MADV_MERGEABLE);
 | 
			
		||||
        }
 | 
			
		||||
        if (!backend->dump) {
 | 
			
		||||
            qemu_madvise(ptr, sz, QEMU_MADV_DONTDUMP);
 | 
			
		||||
        }
 | 
			
		||||
#ifdef CONFIG_NUMA
 | 
			
		||||
        unsigned long lastbit = find_last_bit(backend->host_nodes, MAX_NODES);
 | 
			
		||||
        /* lastbit == MAX_NODES means maxnode = 0 */
 | 
			
		||||
        unsigned long maxnode = (lastbit + 1) % (MAX_NODES + 1);
 | 
			
		||||
        /* ensure policy won't be ignored in case memory is preallocated
 | 
			
		||||
         * before mbind(). note: MPOL_MF_STRICT is ignored on hugepages so
 | 
			
		||||
         * this doesn't catch hugepage case. */
 | 
			
		||||
        unsigned flags = MPOL_MF_STRICT | MPOL_MF_MOVE;
 | 
			
		||||
 | 
			
		||||
        /* check for invalid host-nodes and policies and give more verbose
 | 
			
		||||
         * error messages than mbind(). */
 | 
			
		||||
        if (maxnode && backend->policy == MPOL_DEFAULT) {
 | 
			
		||||
            error_setg(errp, "host-nodes must be empty for policy default,"
 | 
			
		||||
                       " or you should explicitly specify a policy other"
 | 
			
		||||
                       " than default");
 | 
			
		||||
            return;
 | 
			
		||||
        } else if (maxnode == 0 && backend->policy != MPOL_DEFAULT) {
 | 
			
		||||
            error_setg(errp, "host-nodes must be set for policy %s",
 | 
			
		||||
                       HostMemPolicy_lookup[backend->policy]);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* We can have up to MAX_NODES nodes, but we need to pass maxnode+1
 | 
			
		||||
         * as argument to mbind() due to an old Linux bug (feature?) which
 | 
			
		||||
         * cuts off the last specified node. This means backend->host_nodes
 | 
			
		||||
         * must have MAX_NODES+1 bits available.
 | 
			
		||||
         */
 | 
			
		||||
        assert(sizeof(backend->host_nodes) >=
 | 
			
		||||
               BITS_TO_LONGS(MAX_NODES + 1) * sizeof(unsigned long));
 | 
			
		||||
        assert(maxnode <= MAX_NODES);
 | 
			
		||||
        if (mbind(ptr, sz, backend->policy,
 | 
			
		||||
                  maxnode ? backend->host_nodes : NULL, maxnode + 1, flags)) {
 | 
			
		||||
            error_setg_errno(errp, errno,
 | 
			
		||||
                             "cannot bind memory to host NUMA nodes");
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
#endif
 | 
			
		||||
        /* Preallocate memory after the NUMA policy has been instantiated.
 | 
			
		||||
         * This is necessary to guarantee memory is allocated with
 | 
			
		||||
         * specified NUMA policy in place.
 | 
			
		||||
         */
 | 
			
		||||
        if (backend->prealloc) {
 | 
			
		||||
            os_mem_prealloc(memory_region_get_fd(&backend->mr), ptr, sz);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
host_memory_backend_class_init(ObjectClass *oc, void *data)
 | 
			
		||||
{
 | 
			
		||||
    UserCreatableClass *ucc = USER_CREATABLE_CLASS(oc);
 | 
			
		||||
 | 
			
		||||
    ucc->complete = host_memory_backend_memory_complete;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo host_memory_backend_info = {
 | 
			
		||||
    .name = TYPE_MEMORY_BACKEND,
 | 
			
		||||
    .parent = TYPE_OBJECT,
 | 
			
		||||
    .abstract = true,
 | 
			
		||||
    .class_size = sizeof(HostMemoryBackendClass),
 | 
			
		||||
    .class_init = host_memory_backend_class_init,
 | 
			
		||||
    .instance_size = sizeof(HostMemoryBackend),
 | 
			
		||||
    .instance_init = host_memory_backend_init,
 | 
			
		||||
    .instance_finalize = host_memory_backend_finalize,
 | 
			
		||||
    .interfaces = (InterfaceInfo[]) {
 | 
			
		||||
        { TYPE_USER_CREATABLE },
 | 
			
		||||
        { }
 | 
			
		||||
    }
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&host_memory_backend_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
@@ -1,231 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Random Number Generator Backend
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2012
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "sysemu/rng.h"
 | 
			
		||||
#include "sysemu/char.h"
 | 
			
		||||
#include "qapi/qmp/qerror.h"
 | 
			
		||||
#include "hw/qdev.h" /* just for DEFINE_PROP_CHR */
 | 
			
		||||
 | 
			
		||||
#define TYPE_RNG_EGD "rng-egd"
 | 
			
		||||
#define RNG_EGD(obj) OBJECT_CHECK(RngEgd, (obj), TYPE_RNG_EGD)
 | 
			
		||||
 | 
			
		||||
typedef struct RngEgd
 | 
			
		||||
{
 | 
			
		||||
    RngBackend parent;
 | 
			
		||||
 | 
			
		||||
    CharDriverState *chr;
 | 
			
		||||
    char *chr_name;
 | 
			
		||||
 | 
			
		||||
    GSList *requests;
 | 
			
		||||
} RngEgd;
 | 
			
		||||
 | 
			
		||||
typedef struct RngRequest
 | 
			
		||||
{
 | 
			
		||||
    EntropyReceiveFunc *receive_entropy;
 | 
			
		||||
    uint8_t *data;
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    size_t offset;
 | 
			
		||||
    size_t size;
 | 
			
		||||
} RngRequest;
 | 
			
		||||
 | 
			
		||||
static void rng_egd_request_entropy(RngBackend *b, size_t size,
 | 
			
		||||
                                    EntropyReceiveFunc *receive_entropy,
 | 
			
		||||
                                    void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(b);
 | 
			
		||||
    RngRequest *req;
 | 
			
		||||
 | 
			
		||||
    req = g_malloc(sizeof(*req));
 | 
			
		||||
 | 
			
		||||
    req->offset = 0;
 | 
			
		||||
    req->size = size;
 | 
			
		||||
    req->receive_entropy = receive_entropy;
 | 
			
		||||
    req->opaque = opaque;
 | 
			
		||||
    req->data = g_malloc(req->size);
 | 
			
		||||
 | 
			
		||||
    while (size > 0) {
 | 
			
		||||
        uint8_t header[2];
 | 
			
		||||
        uint8_t len = MIN(size, 255);
 | 
			
		||||
 | 
			
		||||
        /* synchronous entropy request */
 | 
			
		||||
        header[0] = 0x02;
 | 
			
		||||
        header[1] = len;
 | 
			
		||||
 | 
			
		||||
        qemu_chr_fe_write(s->chr, header, sizeof(header));
 | 
			
		||||
 | 
			
		||||
        size -= len;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->requests = g_slist_append(s->requests, req);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_free_request(RngRequest *req)
 | 
			
		||||
{
 | 
			
		||||
    g_free(req->data);
 | 
			
		||||
    g_free(req);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int rng_egd_chr_can_read(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(opaque);
 | 
			
		||||
    GSList *i;
 | 
			
		||||
    int size = 0;
 | 
			
		||||
 | 
			
		||||
    for (i = s->requests; i; i = i->next) {
 | 
			
		||||
        RngRequest *req = i->data;
 | 
			
		||||
        size += req->size - req->offset;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return size;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_chr_read(void *opaque, const uint8_t *buf, int size)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(opaque);
 | 
			
		||||
    size_t buf_offset = 0;
 | 
			
		||||
 | 
			
		||||
    while (size > 0 && s->requests) {
 | 
			
		||||
        RngRequest *req = s->requests->data;
 | 
			
		||||
        int len = MIN(size, req->size - req->offset);
 | 
			
		||||
 | 
			
		||||
        memcpy(req->data + req->offset, buf + buf_offset, len);
 | 
			
		||||
        buf_offset += len;
 | 
			
		||||
        req->offset += len;
 | 
			
		||||
        size -= len;
 | 
			
		||||
 | 
			
		||||
        if (req->offset == req->size) {
 | 
			
		||||
            s->requests = g_slist_remove_link(s->requests, s->requests);
 | 
			
		||||
 | 
			
		||||
            req->receive_entropy(req->opaque, req->data, req->size);
 | 
			
		||||
 | 
			
		||||
            rng_egd_free_request(req);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_free_requests(RngEgd *s)
 | 
			
		||||
{
 | 
			
		||||
    GSList *i;
 | 
			
		||||
 | 
			
		||||
    for (i = s->requests; i; i = i->next) {
 | 
			
		||||
        rng_egd_free_request(i->data);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_slist_free(s->requests);
 | 
			
		||||
    s->requests = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_cancel_requests(RngBackend *b)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(b);
 | 
			
		||||
 | 
			
		||||
    /* We simply delete the list of pending requests.  If there is data in the 
 | 
			
		||||
     * queue waiting to be read, this is okay, because there will always be
 | 
			
		||||
     * more data than we requested originally
 | 
			
		||||
     */
 | 
			
		||||
    rng_egd_free_requests(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_opened(RngBackend *b, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(b);
 | 
			
		||||
 | 
			
		||||
    if (s->chr_name == NULL) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER_VALUE,
 | 
			
		||||
                  "chardev", "a valid character device");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->chr = qemu_chr_find(s->chr_name);
 | 
			
		||||
    if (s->chr == NULL) {
 | 
			
		||||
        error_set(errp, QERR_DEVICE_NOT_FOUND, s->chr_name);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (qemu_chr_fe_claim(s->chr) != 0) {
 | 
			
		||||
        error_set(errp, QERR_DEVICE_IN_USE, s->chr_name);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* FIXME we should resubmit pending requests when the CDS reconnects. */
 | 
			
		||||
    qemu_chr_add_handlers(s->chr, rng_egd_chr_can_read, rng_egd_chr_read,
 | 
			
		||||
                          NULL, s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_set_chardev(Object *obj, const char *value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RngBackend *b = RNG_BACKEND(obj);
 | 
			
		||||
    RngEgd *s = RNG_EGD(b);
 | 
			
		||||
 | 
			
		||||
    if (b->opened) {
 | 
			
		||||
        error_set(errp, QERR_PERMISSION_DENIED);
 | 
			
		||||
    } else {
 | 
			
		||||
        s->chr_name = g_strdup(value);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static char *rng_egd_get_chardev(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(obj);
 | 
			
		||||
 | 
			
		||||
    if (s->chr && s->chr->label) {
 | 
			
		||||
        return g_strdup(s->chr->label);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_init(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    object_property_add_str(obj, "chardev",
 | 
			
		||||
                            rng_egd_get_chardev, rng_egd_set_chardev,
 | 
			
		||||
                            NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_finalize(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    RngEgd *s = RNG_EGD(obj);
 | 
			
		||||
 | 
			
		||||
    if (s->chr) {
 | 
			
		||||
        qemu_chr_add_handlers(s->chr, NULL, NULL, NULL, NULL);
 | 
			
		||||
        qemu_chr_fe_release(s->chr);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(s->chr_name);
 | 
			
		||||
 | 
			
		||||
    rng_egd_free_requests(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_egd_class_init(ObjectClass *klass, void *data)
 | 
			
		||||
{
 | 
			
		||||
    RngBackendClass *rbc = RNG_BACKEND_CLASS(klass);
 | 
			
		||||
 | 
			
		||||
    rbc->request_entropy = rng_egd_request_entropy;
 | 
			
		||||
    rbc->cancel_requests = rng_egd_cancel_requests;
 | 
			
		||||
    rbc->opened = rng_egd_opened;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo rng_egd_info = {
 | 
			
		||||
    .name = TYPE_RNG_EGD,
 | 
			
		||||
    .parent = TYPE_RNG_BACKEND,
 | 
			
		||||
    .instance_size = sizeof(RngEgd),
 | 
			
		||||
    .class_init = rng_egd_class_init,
 | 
			
		||||
    .instance_init = rng_egd_init,
 | 
			
		||||
    .instance_finalize = rng_egd_finalize,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&rng_egd_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
@@ -1,160 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Random Number Generator Backend
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2012
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "sysemu/rng-random.h"
 | 
			
		||||
#include "sysemu/rng.h"
 | 
			
		||||
#include "qapi/qmp/qerror.h"
 | 
			
		||||
#include "qemu/main-loop.h"
 | 
			
		||||
 | 
			
		||||
struct RndRandom
 | 
			
		||||
{
 | 
			
		||||
    RngBackend parent;
 | 
			
		||||
 | 
			
		||||
    int fd;
 | 
			
		||||
    char *filename;
 | 
			
		||||
 | 
			
		||||
    EntropyReceiveFunc *receive_func;
 | 
			
		||||
    void *opaque;
 | 
			
		||||
    size_t size;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
/**
 | 
			
		||||
 * A simple and incomplete backend to request entropy from /dev/random.
 | 
			
		||||
 *
 | 
			
		||||
 * This backend exposes an additional "filename" property that can be used to
 | 
			
		||||
 * set the filename to use to open the backend.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
static void entropy_available(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(opaque);
 | 
			
		||||
    uint8_t buffer[s->size];
 | 
			
		||||
    ssize_t len;
 | 
			
		||||
 | 
			
		||||
    len = read(s->fd, buffer, s->size);
 | 
			
		||||
    if (len < 0 && errno == EAGAIN) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    g_assert(len != -1);
 | 
			
		||||
 | 
			
		||||
    s->receive_func(s->opaque, buffer, len);
 | 
			
		||||
    s->receive_func = NULL;
 | 
			
		||||
 | 
			
		||||
    qemu_set_fd_handler(s->fd, NULL, NULL, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_random_request_entropy(RngBackend *b, size_t size,
 | 
			
		||||
                                        EntropyReceiveFunc *receive_entropy,
 | 
			
		||||
                                        void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(b);
 | 
			
		||||
 | 
			
		||||
    if (s->receive_func) {
 | 
			
		||||
        s->receive_func(s->opaque, NULL, 0);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->receive_func = receive_entropy;
 | 
			
		||||
    s->opaque = opaque;
 | 
			
		||||
    s->size = size;
 | 
			
		||||
 | 
			
		||||
    qemu_set_fd_handler(s->fd, entropy_available, NULL, s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_random_opened(RngBackend *b, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(b);
 | 
			
		||||
 | 
			
		||||
    if (s->filename == NULL) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER_VALUE,
 | 
			
		||||
                  "filename", "a valid filename");
 | 
			
		||||
    } else {
 | 
			
		||||
        s->fd = qemu_open(s->filename, O_RDONLY | O_NONBLOCK);
 | 
			
		||||
        if (s->fd == -1) {
 | 
			
		||||
            error_setg_file_open(errp, errno, s->filename);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static char *rng_random_get_filename(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(obj);
 | 
			
		||||
 | 
			
		||||
    if (s->filename) {
 | 
			
		||||
        return g_strdup(s->filename);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_random_set_filename(Object *obj, const char *filename,
 | 
			
		||||
                                 Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RngBackend *b = RNG_BACKEND(obj);
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(obj);
 | 
			
		||||
 | 
			
		||||
    if (b->opened) {
 | 
			
		||||
        error_set(errp, QERR_PERMISSION_DENIED);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(s->filename);
 | 
			
		||||
    s->filename = g_strdup(filename);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_random_init(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(obj);
 | 
			
		||||
 | 
			
		||||
    object_property_add_str(obj, "filename",
 | 
			
		||||
                            rng_random_get_filename,
 | 
			
		||||
                            rng_random_set_filename,
 | 
			
		||||
                            NULL);
 | 
			
		||||
 | 
			
		||||
    s->filename = g_strdup("/dev/random");
 | 
			
		||||
    s->fd = -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_random_finalize(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    RndRandom *s = RNG_RANDOM(obj);
 | 
			
		||||
 | 
			
		||||
    if (s->fd != -1) {
 | 
			
		||||
        qemu_set_fd_handler(s->fd, NULL, NULL, NULL);
 | 
			
		||||
        qemu_close(s->fd);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(s->filename);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_random_class_init(ObjectClass *klass, void *data)
 | 
			
		||||
{
 | 
			
		||||
    RngBackendClass *rbc = RNG_BACKEND_CLASS(klass);
 | 
			
		||||
 | 
			
		||||
    rbc->request_entropy = rng_random_request_entropy;
 | 
			
		||||
    rbc->opened = rng_random_opened;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo rng_random_info = {
 | 
			
		||||
    .name = TYPE_RNG_RANDOM,
 | 
			
		||||
    .parent = TYPE_RNG_BACKEND,
 | 
			
		||||
    .instance_size = sizeof(RndRandom),
 | 
			
		||||
    .class_init = rng_random_class_init,
 | 
			
		||||
    .instance_init = rng_random_init,
 | 
			
		||||
    .instance_finalize = rng_random_finalize,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&rng_random_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
							
								
								
									
										109
									
								
								backends/rng.c
									
									
									
									
									
								
							
							
						
						
									
										109
									
								
								backends/rng.c
									
									
									
									
									
								
							@@ -1,109 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Random Number Generator Backend
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2012
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "sysemu/rng.h"
 | 
			
		||||
#include "qapi/qmp/qerror.h"
 | 
			
		||||
#include "qom/object_interfaces.h"
 | 
			
		||||
 | 
			
		||||
void rng_backend_request_entropy(RngBackend *s, size_t size,
 | 
			
		||||
                                 EntropyReceiveFunc *receive_entropy,
 | 
			
		||||
                                 void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RngBackendClass *k = RNG_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    if (k->request_entropy) {
 | 
			
		||||
        k->request_entropy(s, size, receive_entropy, opaque);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void rng_backend_cancel_requests(RngBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    RngBackendClass *k = RNG_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    if (k->cancel_requests) {
 | 
			
		||||
        k->cancel_requests(s);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool rng_backend_prop_get_opened(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RngBackend *s = RNG_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    return s->opened;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_backend_complete(UserCreatable *uc, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    object_property_set_bool(OBJECT(uc), true, "opened", errp);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_backend_prop_set_opened(Object *obj, bool value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    RngBackend *s = RNG_BACKEND(obj);
 | 
			
		||||
    RngBackendClass *k = RNG_BACKEND_GET_CLASS(s);
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    if (value == s->opened) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!value && s->opened) {
 | 
			
		||||
        error_set(errp, QERR_PERMISSION_DENIED);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (k->opened) {
 | 
			
		||||
        k->opened(s, &local_err);
 | 
			
		||||
        if (local_err) {
 | 
			
		||||
            error_propagate(errp, local_err);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->opened = true;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_backend_init(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    object_property_add_bool(obj, "opened",
 | 
			
		||||
                             rng_backend_prop_get_opened,
 | 
			
		||||
                             rng_backend_prop_set_opened,
 | 
			
		||||
                             NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void rng_backend_class_init(ObjectClass *oc, void *data)
 | 
			
		||||
{
 | 
			
		||||
    UserCreatableClass *ucc = USER_CREATABLE_CLASS(oc);
 | 
			
		||||
 | 
			
		||||
    ucc->complete = rng_backend_complete;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo rng_backend_info = {
 | 
			
		||||
    .name = TYPE_RNG_BACKEND,
 | 
			
		||||
    .parent = TYPE_OBJECT,
 | 
			
		||||
    .instance_size = sizeof(RngBackend),
 | 
			
		||||
    .instance_init = rng_backend_init,
 | 
			
		||||
    .class_size = sizeof(RngBackendClass),
 | 
			
		||||
    .class_init = rng_backend_class_init,
 | 
			
		||||
    .abstract = true,
 | 
			
		||||
    .interfaces = (InterfaceInfo[]) {
 | 
			
		||||
        { TYPE_USER_CREATABLE },
 | 
			
		||||
        { }
 | 
			
		||||
    }
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&rng_backend_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
							
								
								
									
										193
									
								
								backends/tpm.c
									
									
									
									
									
								
							
							
						
						
									
										193
									
								
								backends/tpm.c
									
									
									
									
									
								
							@@ -1,193 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU TPM Backend
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2013
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Stefan Berger   <stefanb@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 * Based on backends/rng.c by Anthony Liguori
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "sysemu/tpm_backend.h"
 | 
			
		||||
#include "qapi/qmp/qerror.h"
 | 
			
		||||
#include "sysemu/tpm.h"
 | 
			
		||||
#include "qemu/thread.h"
 | 
			
		||||
#include "sysemu/tpm_backend_int.h"
 | 
			
		||||
 | 
			
		||||
enum TpmType tpm_backend_get_type(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->type;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
const char *tpm_backend_get_desc(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->desc();
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_destroy(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->destroy(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int tpm_backend_init(TPMBackend *s, TPMState *state,
 | 
			
		||||
                     TPMRecvDataCB *datacb)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->init(s, state, datacb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int tpm_backend_startup_tpm(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->startup_tpm(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool tpm_backend_had_startup_error(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->had_startup_error(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
size_t tpm_backend_realloc_buffer(TPMBackend *s, TPMSizedBuffer *sb)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->realloc_buffer(sb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_deliver_request(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    k->ops->deliver_request(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_reset(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    k->ops->reset(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_cancel_cmd(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    k->ops->cancel_cmd(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
bool tpm_backend_get_tpm_established_flag(TPMBackend *s)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
 | 
			
		||||
    return k->ops->get_tpm_established_flag(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool tpm_backend_prop_get_opened(Object *obj, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackend *s = TPM_BACKEND(obj);
 | 
			
		||||
 | 
			
		||||
    return s->opened;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_open(TPMBackend *s, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    object_property_set_bool(OBJECT(s), true, "opened", errp);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void tpm_backend_prop_set_opened(Object *obj, bool value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    TPMBackend *s = TPM_BACKEND(obj);
 | 
			
		||||
    TPMBackendClass *k = TPM_BACKEND_GET_CLASS(s);
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    if (value == s->opened) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!value && s->opened) {
 | 
			
		||||
        error_set(errp, QERR_PERMISSION_DENIED);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (k->opened) {
 | 
			
		||||
        k->opened(s, &local_err);
 | 
			
		||||
        if (local_err) {
 | 
			
		||||
            error_propagate(errp, local_err);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->opened = true;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void tpm_backend_instance_init(Object *obj)
 | 
			
		||||
{
 | 
			
		||||
    object_property_add_bool(obj, "opened",
 | 
			
		||||
                             tpm_backend_prop_get_opened,
 | 
			
		||||
                             tpm_backend_prop_set_opened,
 | 
			
		||||
                             NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_thread_deliver_request(TPMBackendThread *tbt)
 | 
			
		||||
{
 | 
			
		||||
   g_thread_pool_push(tbt->pool, (gpointer)TPM_BACKEND_CMD_PROCESS_CMD, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_thread_create(TPMBackendThread *tbt,
 | 
			
		||||
                               GFunc func, gpointer user_data)
 | 
			
		||||
{
 | 
			
		||||
    if (!tbt->pool) {
 | 
			
		||||
        tbt->pool = g_thread_pool_new(func, user_data, 1, TRUE, NULL);
 | 
			
		||||
        g_thread_pool_push(tbt->pool, (gpointer)TPM_BACKEND_CMD_INIT, NULL);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_thread_end(TPMBackendThread *tbt)
 | 
			
		||||
{
 | 
			
		||||
    if (tbt->pool) {
 | 
			
		||||
        g_thread_pool_push(tbt->pool, (gpointer)TPM_BACKEND_CMD_END, NULL);
 | 
			
		||||
        g_thread_pool_free(tbt->pool, FALSE, TRUE);
 | 
			
		||||
        tbt->pool = NULL;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void tpm_backend_thread_tpm_reset(TPMBackendThread *tbt,
 | 
			
		||||
                                  GFunc func, gpointer user_data)
 | 
			
		||||
{
 | 
			
		||||
    if (!tbt->pool) {
 | 
			
		||||
        tpm_backend_thread_create(tbt, func, user_data);
 | 
			
		||||
    } else {
 | 
			
		||||
        g_thread_pool_push(tbt->pool, (gpointer)TPM_BACKEND_CMD_TPM_RESET,
 | 
			
		||||
                           NULL);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const TypeInfo tpm_backend_info = {
 | 
			
		||||
    .name = TYPE_TPM_BACKEND,
 | 
			
		||||
    .parent = TYPE_OBJECT,
 | 
			
		||||
    .instance_size = sizeof(TPMBackend),
 | 
			
		||||
    .instance_init = tpm_backend_instance_init,
 | 
			
		||||
    .class_size = sizeof(TPMBackendClass),
 | 
			
		||||
    .abstract = true,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void register_types(void)
 | 
			
		||||
{
 | 
			
		||||
    type_register_static(&tpm_backend_info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
type_init(register_types);
 | 
			
		||||
							
								
								
									
										119
									
								
								balloon.c
									
									
									
									
									
								
							
							
						
						
									
										119
									
								
								balloon.c
									
									
									
									
									
								
							@@ -1,119 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Generic Balloon handlers and management
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2003-2008 Fabrice Bellard
 | 
			
		||||
 * Copyright (C) 2011 Red Hat, Inc.
 | 
			
		||||
 * Copyright (C) 2011 Amit Shah <amit.shah@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "monitor/monitor.h"
 | 
			
		||||
#include "exec/cpu-common.h"
 | 
			
		||||
#include "sysemu/kvm.h"
 | 
			
		||||
#include "sysemu/balloon.h"
 | 
			
		||||
#include "trace.h"
 | 
			
		||||
#include "qmp-commands.h"
 | 
			
		||||
#include "qapi/qmp/qjson.h"
 | 
			
		||||
 | 
			
		||||
static QEMUBalloonEvent *balloon_event_fn;
 | 
			
		||||
static QEMUBalloonStatus *balloon_stat_fn;
 | 
			
		||||
static void *balloon_opaque;
 | 
			
		||||
 | 
			
		||||
int qemu_add_balloon_handler(QEMUBalloonEvent *event_func,
 | 
			
		||||
                             QEMUBalloonStatus *stat_func, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    if (balloon_event_fn || balloon_stat_fn || balloon_opaque) {
 | 
			
		||||
        /* We're already registered one balloon handler.  How many can
 | 
			
		||||
         * a guest really have?
 | 
			
		||||
         */
 | 
			
		||||
        error_report("Another balloon device already registered");
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    balloon_event_fn = event_func;
 | 
			
		||||
    balloon_stat_fn = stat_func;
 | 
			
		||||
    balloon_opaque = opaque;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void qemu_remove_balloon_handler(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    if (balloon_opaque != opaque) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    balloon_event_fn = NULL;
 | 
			
		||||
    balloon_stat_fn = NULL;
 | 
			
		||||
    balloon_opaque = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qemu_balloon(ram_addr_t target)
 | 
			
		||||
{
 | 
			
		||||
    if (!balloon_event_fn) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    trace_balloon_event(balloon_opaque, target);
 | 
			
		||||
    balloon_event_fn(balloon_opaque, target);
 | 
			
		||||
    return 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qemu_balloon_status(BalloonInfo *info)
 | 
			
		||||
{
 | 
			
		||||
    if (!balloon_stat_fn) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    balloon_stat_fn(balloon_opaque, info);
 | 
			
		||||
    return 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BalloonInfo *qmp_query_balloon(Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BalloonInfo *info;
 | 
			
		||||
 | 
			
		||||
    if (kvm_enabled() && !kvm_has_sync_mmu()) {
 | 
			
		||||
        error_set(errp, QERR_KVM_MISSING_CAP, "synchronous MMU", "balloon");
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    info = g_malloc0(sizeof(*info));
 | 
			
		||||
 | 
			
		||||
    if (qemu_balloon_status(info) == 0) {
 | 
			
		||||
        error_set(errp, QERR_DEVICE_NOT_ACTIVE, "balloon");
 | 
			
		||||
        qapi_free_BalloonInfo(info);
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return info;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void qmp_balloon(int64_t value, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    if (kvm_enabled() && !kvm_has_sync_mmu()) {
 | 
			
		||||
        error_set(errp, QERR_KVM_MISSING_CAP, "synchronous MMU", "balloon");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (value <= 0) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER_VALUE, "target", "a size");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    
 | 
			
		||||
    if (qemu_balloon(value) == 0) {
 | 
			
		||||
        error_set(errp, QERR_DEVICE_NOT_ACTIVE, "balloon");
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										27
									
								
								balloon.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										27
									
								
								balloon.h
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,27 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Balloon
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2008
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 | 
			
		||||
 * the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#ifndef _QEMU_BALLOON_H
 | 
			
		||||
#define _QEMU_BALLOON_H
 | 
			
		||||
 | 
			
		||||
#include "cpu-defs.h"
 | 
			
		||||
 | 
			
		||||
typedef ram_addr_t (QEMUBalloonEvent)(void *opaque, ram_addr_t target);
 | 
			
		||||
 | 
			
		||||
void qemu_add_balloon_handler(QEMUBalloonEvent *func, void *opaque);
 | 
			
		||||
 | 
			
		||||
void qemu_balloon(ram_addr_t target);
 | 
			
		||||
 | 
			
		||||
ram_addr_t qemu_balloon_status(void);
 | 
			
		||||
 | 
			
		||||
#endif
 | 
			
		||||
							
								
								
									
										252
									
								
								block-bochs.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										252
									
								
								block-bochs.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,252 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the various disk image formats used by Bochs
 | 
			
		||||
 * Currently only for "growing" type in read-only mode
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2005 Alex Beregszaszi
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
 | 
			
		||||
#define HEADER_MAGIC "Bochs Virtual HD Image"
 | 
			
		||||
#define HEADER_VERSION 0x00020000
 | 
			
		||||
#define HEADER_V1 0x00010000
 | 
			
		||||
#define HEADER_SIZE 512
 | 
			
		||||
 | 
			
		||||
#define REDOLOG_TYPE "Redolog"
 | 
			
		||||
#define GROWING_TYPE "Growing"
 | 
			
		||||
 | 
			
		||||
// not allocated: 0xffffffff
 | 
			
		||||
 | 
			
		||||
// always little-endian
 | 
			
		||||
struct bochs_header_v1 {
 | 
			
		||||
    char magic[32]; // "Bochs Virtual HD Image"
 | 
			
		||||
    char type[16]; // "Redolog"
 | 
			
		||||
    char subtype[16]; // "Undoable" / "Volatile" / "Growing"
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t header; // size of header
 | 
			
		||||
 | 
			
		||||
    union {
 | 
			
		||||
	struct {
 | 
			
		||||
	    uint32_t catalog; // num of entries
 | 
			
		||||
	    uint32_t bitmap; // bitmap size
 | 
			
		||||
	    uint32_t extent; // extent size
 | 
			
		||||
	    uint64_t disk; // disk size
 | 
			
		||||
	    char padding[HEADER_SIZE - 64 - 8 - 20];
 | 
			
		||||
	} redolog;
 | 
			
		||||
	char padding[HEADER_SIZE - 64 - 8];
 | 
			
		||||
    } extra;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
// always little-endian
 | 
			
		||||
struct bochs_header {
 | 
			
		||||
    char magic[32]; // "Bochs Virtual HD Image"
 | 
			
		||||
    char type[16]; // "Redolog"
 | 
			
		||||
    char subtype[16]; // "Undoable" / "Volatile" / "Growing"
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t header; // size of header
 | 
			
		||||
 | 
			
		||||
    union {
 | 
			
		||||
	struct {
 | 
			
		||||
	    uint32_t catalog; // num of entries
 | 
			
		||||
	    uint32_t bitmap; // bitmap size
 | 
			
		||||
	    uint32_t extent; // extent size
 | 
			
		||||
	    uint32_t reserved; // for ???
 | 
			
		||||
	    uint64_t disk; // disk size
 | 
			
		||||
	    char padding[HEADER_SIZE - 64 - 8 - 24];
 | 
			
		||||
	} redolog;
 | 
			
		||||
	char padding[HEADER_SIZE - 64 - 8];
 | 
			
		||||
    } extra;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVBochsState {
 | 
			
		||||
    int fd;
 | 
			
		||||
 | 
			
		||||
    uint32_t *catalog_bitmap;
 | 
			
		||||
    int catalog_size;
 | 
			
		||||
 | 
			
		||||
    int data_offset;
 | 
			
		||||
 | 
			
		||||
    int bitmap_blocks;
 | 
			
		||||
    int extent_blocks;
 | 
			
		||||
    int extent_size;
 | 
			
		||||
} BDRVBochsState;
 | 
			
		||||
 | 
			
		||||
static int bochs_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const struct bochs_header *bochs = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size < HEADER_SIZE)
 | 
			
		||||
	return 0;
 | 
			
		||||
 | 
			
		||||
    if (!strcmp(bochs->magic, HEADER_MAGIC) &&
 | 
			
		||||
	!strcmp(bochs->type, REDOLOG_TYPE) &&
 | 
			
		||||
	!strcmp(bochs->subtype, GROWING_TYPE) &&
 | 
			
		||||
	((le32_to_cpu(bochs->version) == HEADER_VERSION) ||
 | 
			
		||||
	(le32_to_cpu(bochs->version) == HEADER_V1)))
 | 
			
		||||
	return 100;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int bochs_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    int fd, i;
 | 
			
		||||
    struct bochs_header bochs;
 | 
			
		||||
    struct bochs_header_v1 header_v1;
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_RDWR | O_BINARY);
 | 
			
		||||
    if (fd < 0) {
 | 
			
		||||
        fd = open(filename, O_RDONLY | O_BINARY);
 | 
			
		||||
        if (fd < 0)
 | 
			
		||||
            return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bs->read_only = 1; // no write support yet
 | 
			
		||||
 | 
			
		||||
    s->fd = fd;
 | 
			
		||||
 | 
			
		||||
    if (read(fd, &bochs, sizeof(bochs)) != sizeof(bochs)) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (strcmp(bochs.magic, HEADER_MAGIC) ||
 | 
			
		||||
        strcmp(bochs.type, REDOLOG_TYPE) ||
 | 
			
		||||
        strcmp(bochs.subtype, GROWING_TYPE) ||
 | 
			
		||||
	((le32_to_cpu(bochs.version) != HEADER_VERSION) &&
 | 
			
		||||
	(le32_to_cpu(bochs.version) != HEADER_V1))) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (le32_to_cpu(bochs.version) == HEADER_V1) {
 | 
			
		||||
      memcpy(&header_v1, &bochs, sizeof(bochs));
 | 
			
		||||
      bs->total_sectors = le64_to_cpu(header_v1.extra.redolog.disk) / 512;
 | 
			
		||||
    } else {
 | 
			
		||||
      bs->total_sectors = le64_to_cpu(bochs.extra.redolog.disk) / 512;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    lseek(s->fd, le32_to_cpu(bochs.header), SEEK_SET);
 | 
			
		||||
 | 
			
		||||
    s->catalog_size = le32_to_cpu(bochs.extra.redolog.catalog);
 | 
			
		||||
    s->catalog_bitmap = qemu_malloc(s->catalog_size * 4);
 | 
			
		||||
    if (read(s->fd, s->catalog_bitmap, s->catalog_size * 4) !=
 | 
			
		||||
	s->catalog_size * 4)
 | 
			
		||||
	goto fail;
 | 
			
		||||
    for (i = 0; i < s->catalog_size; i++)
 | 
			
		||||
	le32_to_cpus(&s->catalog_bitmap[i]);
 | 
			
		||||
 | 
			
		||||
    s->data_offset = le32_to_cpu(bochs.header) + (s->catalog_size * 4);
 | 
			
		||||
 | 
			
		||||
    s->bitmap_blocks = 1 + (le32_to_cpu(bochs.extra.redolog.bitmap) - 1) / 512;
 | 
			
		||||
    s->extent_blocks = 1 + (le32_to_cpu(bochs.extra.redolog.extent) - 1) / 512;
 | 
			
		||||
 | 
			
		||||
    s->extent_size = le32_to_cpu(bochs.extra.redolog.extent);
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
 fail:
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int seek_to_sector(BlockDriverState *bs, int64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    int64_t offset = sector_num * 512;
 | 
			
		||||
    int64_t extent_index, extent_offset, bitmap_offset, block_offset;
 | 
			
		||||
    char bitmap_entry;
 | 
			
		||||
 | 
			
		||||
    // seek to sector
 | 
			
		||||
    extent_index = offset / s->extent_size;
 | 
			
		||||
    extent_offset = (offset % s->extent_size) / 512;
 | 
			
		||||
 | 
			
		||||
    if (s->catalog_bitmap[extent_index] == 0xffffffff)
 | 
			
		||||
    {
 | 
			
		||||
//	fprintf(stderr, "page not allocated [%x - %x:%x]\n",
 | 
			
		||||
//	    sector_num, extent_index, extent_offset);
 | 
			
		||||
	return -1; // not allocated
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bitmap_offset = s->data_offset + (512 * s->catalog_bitmap[extent_index] *
 | 
			
		||||
	(s->extent_blocks + s->bitmap_blocks));
 | 
			
		||||
    block_offset = bitmap_offset + (512 * (s->bitmap_blocks + extent_offset));
 | 
			
		||||
 | 
			
		||||
//    fprintf(stderr, "sect: %x [ext i: %x o: %x] -> %x bitmap: %x block: %x\n",
 | 
			
		||||
//	sector_num, extent_index, extent_offset,
 | 
			
		||||
//	le32_to_cpu(s->catalog_bitmap[extent_index]),
 | 
			
		||||
//	bitmap_offset, block_offset);
 | 
			
		||||
 | 
			
		||||
    // read in bitmap for current extent
 | 
			
		||||
    lseek(s->fd, bitmap_offset + (extent_offset / 8), SEEK_SET);
 | 
			
		||||
 | 
			
		||||
    read(s->fd, &bitmap_entry, 1);
 | 
			
		||||
 | 
			
		||||
    if (!((bitmap_entry >> (extent_offset % 8)) & 1))
 | 
			
		||||
    {
 | 
			
		||||
//	fprintf(stderr, "sector (%x) in bitmap not allocated\n",
 | 
			
		||||
//	    sector_num);
 | 
			
		||||
	return -1; // not allocated
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    lseek(s->fd, block_offset, SEEK_SET);
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int bochs_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
	if (!seek_to_sector(bs, sector_num))
 | 
			
		||||
	{
 | 
			
		||||
	    ret = read(s->fd, buf, 512);
 | 
			
		||||
	    if (ret != 512)
 | 
			
		||||
		return -1;
 | 
			
		||||
	}
 | 
			
		||||
	else
 | 
			
		||||
            memset(buf, 0, 512);
 | 
			
		||||
        nb_sectors--;
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void bochs_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    qemu_free(s->catalog_bitmap);
 | 
			
		||||
    close(s->fd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_bochs = {
 | 
			
		||||
    "bochs",
 | 
			
		||||
    sizeof(BDRVBochsState),
 | 
			
		||||
    bochs_probe,
 | 
			
		||||
    bochs_open,
 | 
			
		||||
    bochs_read,
 | 
			
		||||
    NULL,
 | 
			
		||||
    bochs_close,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										164
									
								
								block-cloop.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										164
									
								
								block-cloop.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,164 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for CLOOP images
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Johannes E. Schindelin
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
#include <zlib.h>
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVCloopState {
 | 
			
		||||
    int fd;
 | 
			
		||||
    uint32_t block_size;
 | 
			
		||||
    uint32_t n_blocks;
 | 
			
		||||
    uint64_t* offsets;
 | 
			
		||||
    uint32_t sectors_per_block;
 | 
			
		||||
    uint32_t current_block;
 | 
			
		||||
    uint8_t *compressed_block;
 | 
			
		||||
    uint8_t *uncompressed_block;
 | 
			
		||||
    z_stream zstream;
 | 
			
		||||
} BDRVCloopState;
 | 
			
		||||
 | 
			
		||||
static int cloop_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const char* magic_version_2_0="#!/bin/sh\n"
 | 
			
		||||
	"#V2.0 Format\n"
 | 
			
		||||
	"modprobe cloop file=$0 && mount -r -t iso9660 /dev/cloop $1\n";
 | 
			
		||||
    int length=strlen(magic_version_2_0);
 | 
			
		||||
    if(length>buf_size)
 | 
			
		||||
	length=buf_size;
 | 
			
		||||
    if(!memcmp(magic_version_2_0,buf,length))
 | 
			
		||||
	return 2;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cloop_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    uint32_t offsets_size,max_compressed_block_size=1,i;
 | 
			
		||||
 | 
			
		||||
    s->fd = open(filename, O_RDONLY | O_BINARY);
 | 
			
		||||
    if (s->fd < 0)
 | 
			
		||||
        return -errno;
 | 
			
		||||
    bs->read_only = 1;
 | 
			
		||||
 | 
			
		||||
    /* read header */
 | 
			
		||||
    if(lseek(s->fd,128,SEEK_SET)<0) {
 | 
			
		||||
cloop_close:
 | 
			
		||||
	close(s->fd);
 | 
			
		||||
	return -1;
 | 
			
		||||
    }
 | 
			
		||||
    if(read(s->fd,&s->block_size,4)<4)
 | 
			
		||||
	goto cloop_close;
 | 
			
		||||
    s->block_size=be32_to_cpu(s->block_size);
 | 
			
		||||
    if(read(s->fd,&s->n_blocks,4)<4)
 | 
			
		||||
	goto cloop_close;
 | 
			
		||||
    s->n_blocks=be32_to_cpu(s->n_blocks);
 | 
			
		||||
 | 
			
		||||
    /* read offsets */
 | 
			
		||||
    offsets_size=s->n_blocks*sizeof(uint64_t);
 | 
			
		||||
    s->offsets=(uint64_t*)qemu_malloc(offsets_size);
 | 
			
		||||
    if(read(s->fd,s->offsets,offsets_size)<offsets_size)
 | 
			
		||||
	goto cloop_close;
 | 
			
		||||
    for(i=0;i<s->n_blocks;i++) {
 | 
			
		||||
	s->offsets[i]=be64_to_cpu(s->offsets[i]);
 | 
			
		||||
	if(i>0) {
 | 
			
		||||
	    uint32_t size=s->offsets[i]-s->offsets[i-1];
 | 
			
		||||
	    if(size>max_compressed_block_size)
 | 
			
		||||
		max_compressed_block_size=size;
 | 
			
		||||
	}
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* initialize zlib engine */
 | 
			
		||||
    s->compressed_block = qemu_malloc(max_compressed_block_size+1);
 | 
			
		||||
    s->uncompressed_block = qemu_malloc(s->block_size);
 | 
			
		||||
    if(inflateInit(&s->zstream) != Z_OK)
 | 
			
		||||
	goto cloop_close;
 | 
			
		||||
    s->current_block=s->n_blocks;
 | 
			
		||||
 | 
			
		||||
    s->sectors_per_block = s->block_size/512;
 | 
			
		||||
    bs->total_sectors = s->n_blocks*s->sectors_per_block;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int cloop_read_block(BDRVCloopState *s,int block_num)
 | 
			
		||||
{
 | 
			
		||||
    if(s->current_block != block_num) {
 | 
			
		||||
	int ret;
 | 
			
		||||
        uint32_t bytes = s->offsets[block_num+1]-s->offsets[block_num];
 | 
			
		||||
 | 
			
		||||
	lseek(s->fd, s->offsets[block_num], SEEK_SET);
 | 
			
		||||
        ret = read(s->fd, s->compressed_block, bytes);
 | 
			
		||||
        if (ret != bytes)
 | 
			
		||||
            return -1;
 | 
			
		||||
 | 
			
		||||
	s->zstream.next_in = s->compressed_block;
 | 
			
		||||
	s->zstream.avail_in = bytes;
 | 
			
		||||
	s->zstream.next_out = s->uncompressed_block;
 | 
			
		||||
	s->zstream.avail_out = s->block_size;
 | 
			
		||||
	ret = inflateReset(&s->zstream);
 | 
			
		||||
	if(ret != Z_OK)
 | 
			
		||||
	    return -1;
 | 
			
		||||
	ret = inflate(&s->zstream, Z_FINISH);
 | 
			
		||||
	if(ret != Z_STREAM_END || s->zstream.total_out != s->block_size)
 | 
			
		||||
	    return -1;
 | 
			
		||||
 | 
			
		||||
	s->current_block = block_num;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cloop_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for(i=0;i<nb_sectors;i++) {
 | 
			
		||||
	uint32_t sector_offset_in_block=((sector_num+i)%s->sectors_per_block),
 | 
			
		||||
	    block_num=(sector_num+i)/s->sectors_per_block;
 | 
			
		||||
	if(cloop_read_block(s, block_num) != 0)
 | 
			
		||||
	    return -1;
 | 
			
		||||
	memcpy(buf+i*512,s->uncompressed_block+sector_offset_in_block*512,512);
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void cloop_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    close(s->fd);
 | 
			
		||||
    if(s->n_blocks>0)
 | 
			
		||||
	free(s->offsets);
 | 
			
		||||
    free(s->compressed_block);
 | 
			
		||||
    free(s->uncompressed_block);
 | 
			
		||||
    inflateEnd(&s->zstream);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_cloop = {
 | 
			
		||||
    "cloop",
 | 
			
		||||
    sizeof(BDRVCloopState),
 | 
			
		||||
    cloop_probe,
 | 
			
		||||
    cloop_open,
 | 
			
		||||
    cloop_read,
 | 
			
		||||
    NULL,
 | 
			
		||||
    cloop_close,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										267
									
								
								block-cow.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										267
									
								
								block-cow.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,267 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the COW format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#ifndef _WIN32
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
#include <sys/mman.h>
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
/* COW block driver using file system holes */
 | 
			
		||||
 | 
			
		||||
/* user mode linux compatible COW file */
 | 
			
		||||
#define COW_MAGIC 0x4f4f4f4d  /* MOOO */
 | 
			
		||||
#define COW_VERSION 2
 | 
			
		||||
 | 
			
		||||
struct cow_header_v2 {
 | 
			
		||||
    uint32_t magic;
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    char backing_file[1024];
 | 
			
		||||
    int32_t mtime;
 | 
			
		||||
    uint64_t size;
 | 
			
		||||
    uint32_t sectorsize;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVCowState {
 | 
			
		||||
    int fd;
 | 
			
		||||
    uint8_t *cow_bitmap; /* if non NULL, COW mappings are used first */
 | 
			
		||||
    uint8_t *cow_bitmap_addr; /* mmap address of cow_bitmap */
 | 
			
		||||
    int cow_bitmap_size;
 | 
			
		||||
    int64_t cow_sectors_offset;
 | 
			
		||||
} BDRVCowState;
 | 
			
		||||
 | 
			
		||||
static int cow_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const struct cow_header_v2 *cow_header = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size >= sizeof(struct cow_header_v2) &&
 | 
			
		||||
        be32_to_cpu(cow_header->magic) == COW_MAGIC &&
 | 
			
		||||
        be32_to_cpu(cow_header->version) == COW_VERSION)
 | 
			
		||||
        return 100;
 | 
			
		||||
    else
 | 
			
		||||
        return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    int fd;
 | 
			
		||||
    struct cow_header_v2 cow_header;
 | 
			
		||||
    int64_t size;
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_RDWR | O_BINARY | O_LARGEFILE);
 | 
			
		||||
    if (fd < 0) {
 | 
			
		||||
        fd = open(filename, O_RDONLY | O_BINARY | O_LARGEFILE);
 | 
			
		||||
        if (fd < 0)
 | 
			
		||||
            return -1;
 | 
			
		||||
    }
 | 
			
		||||
    s->fd = fd;
 | 
			
		||||
    /* see if it is a cow image */
 | 
			
		||||
    if (read(fd, &cow_header, sizeof(cow_header)) != sizeof(cow_header)) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (be32_to_cpu(cow_header.magic) != COW_MAGIC ||
 | 
			
		||||
        be32_to_cpu(cow_header.version) != COW_VERSION) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* cow image found */
 | 
			
		||||
    size = be64_to_cpu(cow_header.size);
 | 
			
		||||
    bs->total_sectors = size / 512;
 | 
			
		||||
 | 
			
		||||
    pstrcpy(bs->backing_file, sizeof(bs->backing_file),
 | 
			
		||||
            cow_header.backing_file);
 | 
			
		||||
 | 
			
		||||
    /* mmap the bitmap */
 | 
			
		||||
    s->cow_bitmap_size = ((bs->total_sectors + 7) >> 3) + sizeof(cow_header);
 | 
			
		||||
    s->cow_bitmap_addr = mmap(get_mmap_addr(s->cow_bitmap_size),
 | 
			
		||||
                              s->cow_bitmap_size,
 | 
			
		||||
                              PROT_READ | PROT_WRITE,
 | 
			
		||||
                              MAP_SHARED, s->fd, 0);
 | 
			
		||||
    if (s->cow_bitmap_addr == MAP_FAILED)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    s->cow_bitmap = s->cow_bitmap_addr + sizeof(cow_header);
 | 
			
		||||
    s->cow_sectors_offset = (s->cow_bitmap_size + 511) & ~511;
 | 
			
		||||
    return 0;
 | 
			
		||||
 fail:
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline void cow_set_bit(uint8_t *bitmap, int64_t bitnum)
 | 
			
		||||
{
 | 
			
		||||
    bitmap[bitnum / 8] |= (1 << (bitnum%8));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int is_bit_set(const uint8_t *bitmap, int64_t bitnum)
 | 
			
		||||
{
 | 
			
		||||
    return !!(bitmap[bitnum / 8] & (1 << (bitnum%8)));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/* Return true if first block has been changed (ie. current version is
 | 
			
		||||
 * in COW file).  Set the number of continuous blocks for which that
 | 
			
		||||
 * is true. */
 | 
			
		||||
static inline int is_changed(uint8_t *bitmap,
 | 
			
		||||
                             int64_t sector_num, int nb_sectors,
 | 
			
		||||
                             int *num_same)
 | 
			
		||||
{
 | 
			
		||||
    int changed;
 | 
			
		||||
 | 
			
		||||
    if (!bitmap || nb_sectors == 0) {
 | 
			
		||||
	*num_same = nb_sectors;
 | 
			
		||||
	return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    changed = is_bit_set(bitmap, sector_num);
 | 
			
		||||
    for (*num_same = 1; *num_same < nb_sectors; (*num_same)++) {
 | 
			
		||||
	if (is_bit_set(bitmap, sector_num + *num_same) != changed)
 | 
			
		||||
	    break;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return changed;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_is_allocated(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                            int nb_sectors, int *pnum)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    return is_changed(s->cow_bitmap, sector_num, nb_sectors, pnum);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    int ret, n;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        if (is_changed(s->cow_bitmap, sector_num, nb_sectors, &n)) {
 | 
			
		||||
            lseek(s->fd, s->cow_sectors_offset + sector_num * 512, SEEK_SET);
 | 
			
		||||
            ret = read(s->fd, buf, n * 512);
 | 
			
		||||
            if (ret != n * 512)
 | 
			
		||||
                return -1;
 | 
			
		||||
        } else {
 | 
			
		||||
            if (bs->backing_hd) {
 | 
			
		||||
                /* read from the base image */
 | 
			
		||||
                ret = bdrv_read(bs->backing_hd, sector_num, buf, n);
 | 
			
		||||
                if (ret < 0)
 | 
			
		||||
                    return -1;
 | 
			
		||||
            } else {
 | 
			
		||||
            memset(buf, 0, n * 512);
 | 
			
		||||
        }
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                     const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    int ret, i;
 | 
			
		||||
 | 
			
		||||
    lseek(s->fd, s->cow_sectors_offset + sector_num * 512, SEEK_SET);
 | 
			
		||||
    ret = write(s->fd, buf, nb_sectors * 512);
 | 
			
		||||
    if (ret != nb_sectors * 512)
 | 
			
		||||
        return -1;
 | 
			
		||||
    for (i = 0; i < nb_sectors; i++)
 | 
			
		||||
        cow_set_bit(s->cow_bitmap, sector_num + i);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void cow_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    munmap(s->cow_bitmap_addr, s->cow_bitmap_size);
 | 
			
		||||
    close(s->fd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_create(const char *filename, int64_t image_sectors,
 | 
			
		||||
                      const char *image_filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    int fd, cow_fd;
 | 
			
		||||
    struct cow_header_v2 cow_header;
 | 
			
		||||
    struct stat st;
 | 
			
		||||
 | 
			
		||||
    if (flags)
 | 
			
		||||
        return -ENOTSUP;
 | 
			
		||||
 | 
			
		||||
    cow_fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY,
 | 
			
		||||
              0644);
 | 
			
		||||
    if (cow_fd < 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    memset(&cow_header, 0, sizeof(cow_header));
 | 
			
		||||
    cow_header.magic = cpu_to_be32(COW_MAGIC);
 | 
			
		||||
    cow_header.version = cpu_to_be32(COW_VERSION);
 | 
			
		||||
    if (image_filename) {
 | 
			
		||||
        /* Note: if no file, we put a dummy mtime */
 | 
			
		||||
        cow_header.mtime = cpu_to_be32(0);
 | 
			
		||||
 | 
			
		||||
        fd = open(image_filename, O_RDONLY | O_BINARY);
 | 
			
		||||
        if (fd < 0) {
 | 
			
		||||
            close(cow_fd);
 | 
			
		||||
            goto mtime_fail;
 | 
			
		||||
        }
 | 
			
		||||
        if (fstat(fd, &st) != 0) {
 | 
			
		||||
            close(fd);
 | 
			
		||||
            goto mtime_fail;
 | 
			
		||||
        }
 | 
			
		||||
        close(fd);
 | 
			
		||||
        cow_header.mtime = cpu_to_be32(st.st_mtime);
 | 
			
		||||
    mtime_fail:
 | 
			
		||||
        pstrcpy(cow_header.backing_file, sizeof(cow_header.backing_file),
 | 
			
		||||
                image_filename);
 | 
			
		||||
    }
 | 
			
		||||
    cow_header.sectorsize = cpu_to_be32(512);
 | 
			
		||||
    cow_header.size = cpu_to_be64(image_sectors * 512);
 | 
			
		||||
    write(cow_fd, &cow_header, sizeof(cow_header));
 | 
			
		||||
    /* resize to include at least all the bitmap */
 | 
			
		||||
    ftruncate(cow_fd, sizeof(cow_header) + ((image_sectors + 7) >> 3));
 | 
			
		||||
    close(cow_fd);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void cow_flush(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    fsync(s->fd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_cow = {
 | 
			
		||||
    "cow",
 | 
			
		||||
    sizeof(BDRVCowState),
 | 
			
		||||
    cow_probe,
 | 
			
		||||
    cow_open,
 | 
			
		||||
    cow_read,
 | 
			
		||||
    cow_write,
 | 
			
		||||
    cow_close,
 | 
			
		||||
    cow_create,
 | 
			
		||||
    cow_flush,
 | 
			
		||||
    cow_is_allocated,
 | 
			
		||||
};
 | 
			
		||||
#endif
 | 
			
		||||
							
								
								
									
										294
									
								
								block-dmg.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										294
									
								
								block-dmg.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,294 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for DMG images
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Johannes E. Schindelin
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
#include "bswap.h"
 | 
			
		||||
#include <zlib.h>
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVDMGState {
 | 
			
		||||
    int fd;
 | 
			
		||||
 | 
			
		||||
    /* each chunk contains a certain number of sectors,
 | 
			
		||||
     * offsets[i] is the offset in the .dmg file,
 | 
			
		||||
     * lengths[i] is the length of the compressed chunk,
 | 
			
		||||
     * sectors[i] is the sector beginning at offsets[i],
 | 
			
		||||
     * sectorcounts[i] is the number of sectors in that chunk,
 | 
			
		||||
     * the sectors array is ordered
 | 
			
		||||
     * 0<=i<n_chunks */
 | 
			
		||||
 | 
			
		||||
    uint32_t n_chunks;
 | 
			
		||||
    uint32_t* types;
 | 
			
		||||
    uint64_t* offsets;
 | 
			
		||||
    uint64_t* lengths;
 | 
			
		||||
    uint64_t* sectors;
 | 
			
		||||
    uint64_t* sectorcounts;
 | 
			
		||||
    uint32_t current_chunk;
 | 
			
		||||
    uint8_t *compressed_chunk;
 | 
			
		||||
    uint8_t *uncompressed_chunk;
 | 
			
		||||
    z_stream zstream;
 | 
			
		||||
} BDRVDMGState;
 | 
			
		||||
 | 
			
		||||
static int dmg_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    int len=strlen(filename);
 | 
			
		||||
    if(len>4 && !strcmp(filename+len-4,".dmg"))
 | 
			
		||||
	return 2;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static off_t read_off(int fd)
 | 
			
		||||
{
 | 
			
		||||
	uint64_t buffer;
 | 
			
		||||
	if(read(fd,&buffer,8)<8)
 | 
			
		||||
		return 0;
 | 
			
		||||
	return be64_to_cpu(buffer);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static off_t read_uint32(int fd)
 | 
			
		||||
{
 | 
			
		||||
	uint32_t buffer;
 | 
			
		||||
	if(read(fd,&buffer,4)<4)
 | 
			
		||||
		return 0;
 | 
			
		||||
	return be32_to_cpu(buffer);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int dmg_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
    off_t info_begin,info_end,last_in_offset,last_out_offset;
 | 
			
		||||
    uint32_t count;
 | 
			
		||||
    uint32_t max_compressed_size=1,max_sectors_per_chunk=1,i;
 | 
			
		||||
 | 
			
		||||
    s->fd = open(filename, O_RDONLY | O_BINARY);
 | 
			
		||||
    if (s->fd < 0)
 | 
			
		||||
        return -errno;
 | 
			
		||||
    bs->read_only = 1;
 | 
			
		||||
    s->n_chunks = 0;
 | 
			
		||||
    s->offsets = s->lengths = s->sectors = s->sectorcounts = 0;
 | 
			
		||||
 | 
			
		||||
    /* read offset of info blocks */
 | 
			
		||||
    if(lseek(s->fd,-0x1d8,SEEK_END)<0) {
 | 
			
		||||
dmg_close:
 | 
			
		||||
	close(s->fd);
 | 
			
		||||
	/* open raw instead */
 | 
			
		||||
	bs->drv=&bdrv_raw;
 | 
			
		||||
	return bs->drv->bdrv_open(bs, filename, flags);
 | 
			
		||||
    }
 | 
			
		||||
    info_begin=read_off(s->fd);
 | 
			
		||||
    if(info_begin==0)
 | 
			
		||||
	goto dmg_close;
 | 
			
		||||
    if(lseek(s->fd,info_begin,SEEK_SET)<0)
 | 
			
		||||
	goto dmg_close;
 | 
			
		||||
    if(read_uint32(s->fd)!=0x100)
 | 
			
		||||
	goto dmg_close;
 | 
			
		||||
    if((count = read_uint32(s->fd))==0)
 | 
			
		||||
	goto dmg_close;
 | 
			
		||||
    info_end = info_begin+count;
 | 
			
		||||
    if(lseek(s->fd,0xf8,SEEK_CUR)<0)
 | 
			
		||||
	goto dmg_close;
 | 
			
		||||
 | 
			
		||||
    /* read offsets */
 | 
			
		||||
    last_in_offset = last_out_offset = 0;
 | 
			
		||||
    while(lseek(s->fd,0,SEEK_CUR)<info_end) {
 | 
			
		||||
        uint32_t type;
 | 
			
		||||
 | 
			
		||||
	count = read_uint32(s->fd);
 | 
			
		||||
	if(count==0)
 | 
			
		||||
	    goto dmg_close;
 | 
			
		||||
	type = read_uint32(s->fd);
 | 
			
		||||
	if(type!=0x6d697368 || count<244)
 | 
			
		||||
	    lseek(s->fd,count-4,SEEK_CUR);
 | 
			
		||||
	else {
 | 
			
		||||
	    int new_size, chunk_count;
 | 
			
		||||
	    if(lseek(s->fd,200,SEEK_CUR)<0)
 | 
			
		||||
	        goto dmg_close;
 | 
			
		||||
	    chunk_count = (count-204)/40;
 | 
			
		||||
	    new_size = sizeof(uint64_t) * (s->n_chunks + chunk_count);
 | 
			
		||||
	    s->types = qemu_realloc(s->types, new_size/2);
 | 
			
		||||
	    s->offsets = qemu_realloc(s->offsets, new_size);
 | 
			
		||||
	    s->lengths = qemu_realloc(s->lengths, new_size);
 | 
			
		||||
	    s->sectors = qemu_realloc(s->sectors, new_size);
 | 
			
		||||
	    s->sectorcounts = qemu_realloc(s->sectorcounts, new_size);
 | 
			
		||||
 | 
			
		||||
	    for(i=s->n_chunks;i<s->n_chunks+chunk_count;i++) {
 | 
			
		||||
		s->types[i] = read_uint32(s->fd);
 | 
			
		||||
		if(s->types[i]!=0x80000005 && s->types[i]!=1 && s->types[i]!=2) {
 | 
			
		||||
		    if(s->types[i]==0xffffffff) {
 | 
			
		||||
			last_in_offset = s->offsets[i-1]+s->lengths[i-1];
 | 
			
		||||
			last_out_offset = s->sectors[i-1]+s->sectorcounts[i-1];
 | 
			
		||||
		    }
 | 
			
		||||
		    chunk_count--;
 | 
			
		||||
		    i--;
 | 
			
		||||
		    if(lseek(s->fd,36,SEEK_CUR)<0)
 | 
			
		||||
			goto dmg_close;
 | 
			
		||||
		    continue;
 | 
			
		||||
		}
 | 
			
		||||
		read_uint32(s->fd);
 | 
			
		||||
		s->sectors[i] = last_out_offset+read_off(s->fd);
 | 
			
		||||
		s->sectorcounts[i] = read_off(s->fd);
 | 
			
		||||
		s->offsets[i] = last_in_offset+read_off(s->fd);
 | 
			
		||||
		s->lengths[i] = read_off(s->fd);
 | 
			
		||||
		if(s->lengths[i]>max_compressed_size)
 | 
			
		||||
		    max_compressed_size = s->lengths[i];
 | 
			
		||||
		if(s->sectorcounts[i]>max_sectors_per_chunk)
 | 
			
		||||
		    max_sectors_per_chunk = s->sectorcounts[i];
 | 
			
		||||
	    }
 | 
			
		||||
	    s->n_chunks+=chunk_count;
 | 
			
		||||
	}
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* initialize zlib engine */
 | 
			
		||||
    s->compressed_chunk = qemu_malloc(max_compressed_size+1);
 | 
			
		||||
    s->uncompressed_chunk = qemu_malloc(512*max_sectors_per_chunk);
 | 
			
		||||
    if(inflateInit(&s->zstream) != Z_OK)
 | 
			
		||||
	goto dmg_close;
 | 
			
		||||
 | 
			
		||||
    s->current_chunk = s->n_chunks;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int is_sector_in_chunk(BDRVDMGState* s,
 | 
			
		||||
		uint32_t chunk_num,int sector_num)
 | 
			
		||||
{
 | 
			
		||||
    if(chunk_num>=s->n_chunks || s->sectors[chunk_num]>sector_num ||
 | 
			
		||||
	    s->sectors[chunk_num]+s->sectorcounts[chunk_num]<=sector_num)
 | 
			
		||||
	return 0;
 | 
			
		||||
    else
 | 
			
		||||
	return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline uint32_t search_chunk(BDRVDMGState* s,int sector_num)
 | 
			
		||||
{
 | 
			
		||||
    /* binary search */
 | 
			
		||||
    uint32_t chunk1=0,chunk2=s->n_chunks,chunk3;
 | 
			
		||||
    while(chunk1!=chunk2) {
 | 
			
		||||
	chunk3 = (chunk1+chunk2)/2;
 | 
			
		||||
	if(s->sectors[chunk3]>sector_num)
 | 
			
		||||
	    chunk2 = chunk3;
 | 
			
		||||
	else if(s->sectors[chunk3]+s->sectorcounts[chunk3]>sector_num)
 | 
			
		||||
	    return chunk3;
 | 
			
		||||
	else
 | 
			
		||||
	    chunk1 = chunk3;
 | 
			
		||||
    }
 | 
			
		||||
    return s->n_chunks; /* error */
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int dmg_read_chunk(BDRVDMGState *s,int sector_num)
 | 
			
		||||
{
 | 
			
		||||
    if(!is_sector_in_chunk(s,s->current_chunk,sector_num)) {
 | 
			
		||||
	int ret;
 | 
			
		||||
	uint32_t chunk = search_chunk(s,sector_num);
 | 
			
		||||
 | 
			
		||||
	if(chunk>=s->n_chunks)
 | 
			
		||||
	    return -1;
 | 
			
		||||
 | 
			
		||||
	s->current_chunk = s->n_chunks;
 | 
			
		||||
	switch(s->types[chunk]) {
 | 
			
		||||
	case 0x80000005: { /* zlib compressed */
 | 
			
		||||
	    int i;
 | 
			
		||||
 | 
			
		||||
	    ret = lseek(s->fd, s->offsets[chunk], SEEK_SET);
 | 
			
		||||
	    if(ret<0)
 | 
			
		||||
		return -1;
 | 
			
		||||
 | 
			
		||||
	    /* we need to buffer, because only the chunk as whole can be
 | 
			
		||||
	     * inflated. */
 | 
			
		||||
	    i=0;
 | 
			
		||||
	    do {
 | 
			
		||||
		ret = read(s->fd, s->compressed_chunk+i, s->lengths[chunk]-i);
 | 
			
		||||
		if(ret<0 && errno==EINTR)
 | 
			
		||||
		    ret=0;
 | 
			
		||||
		i+=ret;
 | 
			
		||||
	    } while(ret>=0 && ret+i<s->lengths[chunk]);
 | 
			
		||||
 | 
			
		||||
	    if (ret != s->lengths[chunk])
 | 
			
		||||
		return -1;
 | 
			
		||||
 | 
			
		||||
	    s->zstream.next_in = s->compressed_chunk;
 | 
			
		||||
	    s->zstream.avail_in = s->lengths[chunk];
 | 
			
		||||
	    s->zstream.next_out = s->uncompressed_chunk;
 | 
			
		||||
	    s->zstream.avail_out = 512*s->sectorcounts[chunk];
 | 
			
		||||
	    ret = inflateReset(&s->zstream);
 | 
			
		||||
	    if(ret != Z_OK)
 | 
			
		||||
		return -1;
 | 
			
		||||
	    ret = inflate(&s->zstream, Z_FINISH);
 | 
			
		||||
	    if(ret != Z_STREAM_END || s->zstream.total_out != 512*s->sectorcounts[chunk])
 | 
			
		||||
		return -1;
 | 
			
		||||
	    break; }
 | 
			
		||||
	case 1: /* copy */
 | 
			
		||||
	    ret = read(s->fd, s->uncompressed_chunk, s->lengths[chunk]);
 | 
			
		||||
	    if (ret != s->lengths[chunk])
 | 
			
		||||
		return -1;
 | 
			
		||||
	    break;
 | 
			
		||||
	case 2: /* zero */
 | 
			
		||||
	    memset(s->uncompressed_chunk, 0, 512*s->sectorcounts[chunk]);
 | 
			
		||||
	    break;
 | 
			
		||||
	}
 | 
			
		||||
	s->current_chunk = chunk;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int dmg_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for(i=0;i<nb_sectors;i++) {
 | 
			
		||||
	uint32_t sector_offset_in_chunk;
 | 
			
		||||
	if(dmg_read_chunk(s, sector_num+i) != 0)
 | 
			
		||||
	    return -1;
 | 
			
		||||
	sector_offset_in_chunk = sector_num+i-s->sectors[s->current_chunk];
 | 
			
		||||
	memcpy(buf+i*512,s->uncompressed_chunk+sector_offset_in_chunk*512,512);
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void dmg_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
    close(s->fd);
 | 
			
		||||
    if(s->n_chunks>0) {
 | 
			
		||||
	free(s->types);
 | 
			
		||||
	free(s->offsets);
 | 
			
		||||
	free(s->lengths);
 | 
			
		||||
	free(s->sectors);
 | 
			
		||||
	free(s->sectorcounts);
 | 
			
		||||
    }
 | 
			
		||||
    free(s->compressed_chunk);
 | 
			
		||||
    free(s->uncompressed_chunk);
 | 
			
		||||
    inflateEnd(&s->zstream);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_dmg = {
 | 
			
		||||
    "dmg",
 | 
			
		||||
    sizeof(BDRVDMGState),
 | 
			
		||||
    dmg_probe,
 | 
			
		||||
    dmg_open,
 | 
			
		||||
    dmg_read,
 | 
			
		||||
    NULL,
 | 
			
		||||
    dmg_close,
 | 
			
		||||
};
 | 
			
		||||
@@ -1,883 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU live block migration
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright IBM, Corp. 2009
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Liran Schour   <lirans@il.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 | 
			
		||||
 * the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 * Contributions after 2012-01-13 are licensed under the terms of the
 | 
			
		||||
 * GNU GPL, version 2 or (at your option) any later version.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "hw/hw.h"
 | 
			
		||||
#include "qemu/queue.h"
 | 
			
		||||
#include "qemu/timer.h"
 | 
			
		||||
#include "migration/block.h"
 | 
			
		||||
#include "migration/migration.h"
 | 
			
		||||
#include "sysemu/blockdev.h"
 | 
			
		||||
#include <assert.h>
 | 
			
		||||
 | 
			
		||||
#define BLOCK_SIZE                       (1 << 20)
 | 
			
		||||
#define BDRV_SECTORS_PER_DIRTY_CHUNK     (BLOCK_SIZE >> BDRV_SECTOR_BITS)
 | 
			
		||||
 | 
			
		||||
#define BLK_MIG_FLAG_DEVICE_BLOCK       0x01
 | 
			
		||||
#define BLK_MIG_FLAG_EOS                0x02
 | 
			
		||||
#define BLK_MIG_FLAG_PROGRESS           0x04
 | 
			
		||||
#define BLK_MIG_FLAG_ZERO_BLOCK         0x08
 | 
			
		||||
 | 
			
		||||
#define MAX_IS_ALLOCATED_SEARCH 65536
 | 
			
		||||
 | 
			
		||||
//#define DEBUG_BLK_MIGRATION
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG_BLK_MIGRATION
 | 
			
		||||
#define DPRINTF(fmt, ...) \
 | 
			
		||||
    do { printf("blk_migration: " fmt, ## __VA_ARGS__); } while (0)
 | 
			
		||||
#else
 | 
			
		||||
#define DPRINTF(fmt, ...) \
 | 
			
		||||
    do { } while (0)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
typedef struct BlkMigDevState {
 | 
			
		||||
    /* Written during setup phase.  Can be read without a lock.  */
 | 
			
		||||
    BlockDriverState *bs;
 | 
			
		||||
    int shared_base;
 | 
			
		||||
    int64_t total_sectors;
 | 
			
		||||
    QSIMPLEQ_ENTRY(BlkMigDevState) entry;
 | 
			
		||||
 | 
			
		||||
    /* Only used by migration thread.  Does not need a lock.  */
 | 
			
		||||
    int bulk_completed;
 | 
			
		||||
    int64_t cur_sector;
 | 
			
		||||
    int64_t cur_dirty;
 | 
			
		||||
 | 
			
		||||
    /* Protected by block migration lock.  */
 | 
			
		||||
    unsigned long *aio_bitmap;
 | 
			
		||||
    int64_t completed_sectors;
 | 
			
		||||
    BdrvDirtyBitmap *dirty_bitmap;
 | 
			
		||||
    Error *blocker;
 | 
			
		||||
} BlkMigDevState;
 | 
			
		||||
 | 
			
		||||
typedef struct BlkMigBlock {
 | 
			
		||||
    /* Only used by migration thread.  */
 | 
			
		||||
    uint8_t *buf;
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    int64_t sector;
 | 
			
		||||
    int nr_sectors;
 | 
			
		||||
    struct iovec iov;
 | 
			
		||||
    QEMUIOVector qiov;
 | 
			
		||||
    BlockDriverAIOCB *aiocb;
 | 
			
		||||
 | 
			
		||||
    /* Protected by block migration lock.  */
 | 
			
		||||
    int ret;
 | 
			
		||||
    QSIMPLEQ_ENTRY(BlkMigBlock) entry;
 | 
			
		||||
} BlkMigBlock;
 | 
			
		||||
 | 
			
		||||
typedef struct BlkMigState {
 | 
			
		||||
    /* Written during setup phase.  Can be read without a lock.  */
 | 
			
		||||
    int blk_enable;
 | 
			
		||||
    int shared_base;
 | 
			
		||||
    QSIMPLEQ_HEAD(bmds_list, BlkMigDevState) bmds_list;
 | 
			
		||||
    int64_t total_sector_sum;
 | 
			
		||||
    bool zero_blocks;
 | 
			
		||||
 | 
			
		||||
    /* Protected by lock.  */
 | 
			
		||||
    QSIMPLEQ_HEAD(blk_list, BlkMigBlock) blk_list;
 | 
			
		||||
    int submitted;
 | 
			
		||||
    int read_done;
 | 
			
		||||
 | 
			
		||||
    /* Only used by migration thread.  Does not need a lock.  */
 | 
			
		||||
    int transferred;
 | 
			
		||||
    int prev_progress;
 | 
			
		||||
    int bulk_completed;
 | 
			
		||||
 | 
			
		||||
    /* Lock must be taken _inside_ the iothread lock.  */
 | 
			
		||||
    QemuMutex lock;
 | 
			
		||||
} BlkMigState;
 | 
			
		||||
 | 
			
		||||
static BlkMigState block_mig_state;
 | 
			
		||||
 | 
			
		||||
static void blk_mig_lock(void)
 | 
			
		||||
{
 | 
			
		||||
    qemu_mutex_lock(&block_mig_state.lock);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blk_mig_unlock(void)
 | 
			
		||||
{
 | 
			
		||||
    qemu_mutex_unlock(&block_mig_state.lock);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Must run outside of the iothread lock during the bulk phase,
 | 
			
		||||
 * or the VM will stall.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
static void blk_send(QEMUFile *f, BlkMigBlock * blk)
 | 
			
		||||
{
 | 
			
		||||
    int len;
 | 
			
		||||
    uint64_t flags = BLK_MIG_FLAG_DEVICE_BLOCK;
 | 
			
		||||
 | 
			
		||||
    if (block_mig_state.zero_blocks &&
 | 
			
		||||
        buffer_is_zero(blk->buf, BLOCK_SIZE)) {
 | 
			
		||||
        flags |= BLK_MIG_FLAG_ZERO_BLOCK;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* sector number and flags */
 | 
			
		||||
    qemu_put_be64(f, (blk->sector << BDRV_SECTOR_BITS)
 | 
			
		||||
                     | flags);
 | 
			
		||||
 | 
			
		||||
    /* device name */
 | 
			
		||||
    len = strlen(blk->bmds->bs->device_name);
 | 
			
		||||
    qemu_put_byte(f, len);
 | 
			
		||||
    qemu_put_buffer(f, (uint8_t *)blk->bmds->bs->device_name, len);
 | 
			
		||||
 | 
			
		||||
    /* if a block is zero we need to flush here since the network
 | 
			
		||||
     * bandwidth is now a lot higher than the storage device bandwidth.
 | 
			
		||||
     * thus if we queue zero blocks we slow down the migration */
 | 
			
		||||
    if (flags & BLK_MIG_FLAG_ZERO_BLOCK) {
 | 
			
		||||
        qemu_fflush(f);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_put_buffer(f, blk->buf, BLOCK_SIZE);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int blk_mig_active(void)
 | 
			
		||||
{
 | 
			
		||||
    return !QSIMPLEQ_EMPTY(&block_mig_state.bmds_list);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
uint64_t blk_mig_bytes_transferred(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    uint64_t sum = 0;
 | 
			
		||||
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        sum += bmds->completed_sectors;
 | 
			
		||||
    }
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
    return sum << BDRV_SECTOR_BITS;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
uint64_t blk_mig_bytes_remaining(void)
 | 
			
		||||
{
 | 
			
		||||
    return blk_mig_bytes_total() - blk_mig_bytes_transferred();
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
uint64_t blk_mig_bytes_total(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    uint64_t sum = 0;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        sum += bmds->total_sectors;
 | 
			
		||||
    }
 | 
			
		||||
    return sum << BDRV_SECTOR_BITS;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/* Called with migration lock held.  */
 | 
			
		||||
 | 
			
		||||
static int bmds_aio_inflight(BlkMigDevState *bmds, int64_t sector)
 | 
			
		||||
{
 | 
			
		||||
    int64_t chunk = sector / (int64_t)BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
 | 
			
		||||
    if ((sector << BDRV_SECTOR_BITS) < bdrv_getlength(bmds->bs)) {
 | 
			
		||||
        return !!(bmds->aio_bitmap[chunk / (sizeof(unsigned long) * 8)] &
 | 
			
		||||
            (1UL << (chunk % (sizeof(unsigned long) * 8))));
 | 
			
		||||
    } else {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with migration lock held.  */
 | 
			
		||||
 | 
			
		||||
static void bmds_set_aio_inflight(BlkMigDevState *bmds, int64_t sector_num,
 | 
			
		||||
                             int nb_sectors, int set)
 | 
			
		||||
{
 | 
			
		||||
    int64_t start, end;
 | 
			
		||||
    unsigned long val, idx, bit;
 | 
			
		||||
 | 
			
		||||
    start = sector_num / BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
    end = (sector_num + nb_sectors - 1) / BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
 | 
			
		||||
    for (; start <= end; start++) {
 | 
			
		||||
        idx = start / (sizeof(unsigned long) * 8);
 | 
			
		||||
        bit = start % (sizeof(unsigned long) * 8);
 | 
			
		||||
        val = bmds->aio_bitmap[idx];
 | 
			
		||||
        if (set) {
 | 
			
		||||
            val |= 1UL << bit;
 | 
			
		||||
        } else {
 | 
			
		||||
            val &= ~(1UL << bit);
 | 
			
		||||
        }
 | 
			
		||||
        bmds->aio_bitmap[idx] = val;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void alloc_aio_bitmap(BlkMigDevState *bmds)
 | 
			
		||||
{
 | 
			
		||||
    BlockDriverState *bs = bmds->bs;
 | 
			
		||||
    int64_t bitmap_size;
 | 
			
		||||
 | 
			
		||||
    bitmap_size = (bdrv_getlength(bs) >> BDRV_SECTOR_BITS) +
 | 
			
		||||
            BDRV_SECTORS_PER_DIRTY_CHUNK * 8 - 1;
 | 
			
		||||
    bitmap_size /= BDRV_SECTORS_PER_DIRTY_CHUNK * 8;
 | 
			
		||||
 | 
			
		||||
    bmds->aio_bitmap = g_malloc0(bitmap_size);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Never hold migration lock when yielding to the main loop!  */
 | 
			
		||||
 | 
			
		||||
static void blk_mig_read_cb(void *opaque, int ret)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigBlock *blk = opaque;
 | 
			
		||||
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    blk->ret = ret;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_INSERT_TAIL(&block_mig_state.blk_list, blk, entry);
 | 
			
		||||
    bmds_set_aio_inflight(blk->bmds, blk->sector, blk->nr_sectors, 0);
 | 
			
		||||
 | 
			
		||||
    block_mig_state.submitted--;
 | 
			
		||||
    block_mig_state.read_done++;
 | 
			
		||||
    assert(block_mig_state.submitted >= 0);
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with no lock taken.  */
 | 
			
		||||
 | 
			
		||||
static int mig_save_device_bulk(QEMUFile *f, BlkMigDevState *bmds)
 | 
			
		||||
{
 | 
			
		||||
    int64_t total_sectors = bmds->total_sectors;
 | 
			
		||||
    int64_t cur_sector = bmds->cur_sector;
 | 
			
		||||
    BlockDriverState *bs = bmds->bs;
 | 
			
		||||
    BlkMigBlock *blk;
 | 
			
		||||
    int nr_sectors;
 | 
			
		||||
 | 
			
		||||
    if (bmds->shared_base) {
 | 
			
		||||
        qemu_mutex_lock_iothread();
 | 
			
		||||
        while (cur_sector < total_sectors &&
 | 
			
		||||
               !bdrv_is_allocated(bs, cur_sector, MAX_IS_ALLOCATED_SEARCH,
 | 
			
		||||
                                  &nr_sectors)) {
 | 
			
		||||
            cur_sector += nr_sectors;
 | 
			
		||||
        }
 | 
			
		||||
        qemu_mutex_unlock_iothread();
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (cur_sector >= total_sectors) {
 | 
			
		||||
        bmds->cur_sector = bmds->completed_sectors = total_sectors;
 | 
			
		||||
        return 1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bmds->completed_sectors = cur_sector;
 | 
			
		||||
 | 
			
		||||
    cur_sector &= ~((int64_t)BDRV_SECTORS_PER_DIRTY_CHUNK - 1);
 | 
			
		||||
 | 
			
		||||
    /* we are going to transfer a full block even if it is not allocated */
 | 
			
		||||
    nr_sectors = BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
 | 
			
		||||
    if (total_sectors - cur_sector < BDRV_SECTORS_PER_DIRTY_CHUNK) {
 | 
			
		||||
        nr_sectors = total_sectors - cur_sector;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    blk = g_malloc(sizeof(BlkMigBlock));
 | 
			
		||||
    blk->buf = g_malloc(BLOCK_SIZE);
 | 
			
		||||
    blk->bmds = bmds;
 | 
			
		||||
    blk->sector = cur_sector;
 | 
			
		||||
    blk->nr_sectors = nr_sectors;
 | 
			
		||||
 | 
			
		||||
    blk->iov.iov_base = blk->buf;
 | 
			
		||||
    blk->iov.iov_len = nr_sectors * BDRV_SECTOR_SIZE;
 | 
			
		||||
    qemu_iovec_init_external(&blk->qiov, &blk->iov, 1);
 | 
			
		||||
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    block_mig_state.submitted++;
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
 | 
			
		||||
    qemu_mutex_lock_iothread();
 | 
			
		||||
    blk->aiocb = bdrv_aio_readv(bs, cur_sector, &blk->qiov,
 | 
			
		||||
                                nr_sectors, blk_mig_read_cb, blk);
 | 
			
		||||
 | 
			
		||||
    bdrv_reset_dirty(bs, cur_sector, nr_sectors);
 | 
			
		||||
    qemu_mutex_unlock_iothread();
 | 
			
		||||
 | 
			
		||||
    bmds->cur_sector = cur_sector + nr_sectors;
 | 
			
		||||
    return (bmds->cur_sector >= total_sectors);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with iothread lock taken.  */
 | 
			
		||||
 | 
			
		||||
static int set_dirty_tracking(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        bmds->dirty_bitmap = bdrv_create_dirty_bitmap(bmds->bs, BLOCK_SIZE,
 | 
			
		||||
                                                      NULL);
 | 
			
		||||
        if (!bmds->dirty_bitmap) {
 | 
			
		||||
            ret = -errno;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        if (bmds->dirty_bitmap) {
 | 
			
		||||
            bdrv_release_dirty_bitmap(bmds->bs, bmds->dirty_bitmap);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void unset_dirty_tracking(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        bdrv_release_dirty_bitmap(bmds->bs, bmds->dirty_bitmap);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void init_blk_migration_it(void *opaque, BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    int64_t sectors;
 | 
			
		||||
 | 
			
		||||
    if (!bdrv_is_read_only(bs)) {
 | 
			
		||||
        sectors = bdrv_getlength(bs) >> BDRV_SECTOR_BITS;
 | 
			
		||||
        if (sectors <= 0) {
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        bmds = g_malloc0(sizeof(BlkMigDevState));
 | 
			
		||||
        bmds->bs = bs;
 | 
			
		||||
        bmds->bulk_completed = 0;
 | 
			
		||||
        bmds->total_sectors = sectors;
 | 
			
		||||
        bmds->completed_sectors = 0;
 | 
			
		||||
        bmds->shared_base = block_mig_state.shared_base;
 | 
			
		||||
        alloc_aio_bitmap(bmds);
 | 
			
		||||
        error_setg(&bmds->blocker, "block device is in use by migration");
 | 
			
		||||
        bdrv_op_block_all(bs, bmds->blocker);
 | 
			
		||||
        bdrv_ref(bs);
 | 
			
		||||
 | 
			
		||||
        block_mig_state.total_sector_sum += sectors;
 | 
			
		||||
 | 
			
		||||
        if (bmds->shared_base) {
 | 
			
		||||
            DPRINTF("Start migration for %s with shared base image\n",
 | 
			
		||||
                    bs->device_name);
 | 
			
		||||
        } else {
 | 
			
		||||
            DPRINTF("Start full migration for %s\n", bs->device_name);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        QSIMPLEQ_INSERT_TAIL(&block_mig_state.bmds_list, bmds, entry);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void init_blk_migration(QEMUFile *f)
 | 
			
		||||
{
 | 
			
		||||
    block_mig_state.submitted = 0;
 | 
			
		||||
    block_mig_state.read_done = 0;
 | 
			
		||||
    block_mig_state.transferred = 0;
 | 
			
		||||
    block_mig_state.total_sector_sum = 0;
 | 
			
		||||
    block_mig_state.prev_progress = -1;
 | 
			
		||||
    block_mig_state.bulk_completed = 0;
 | 
			
		||||
    block_mig_state.zero_blocks = migrate_zero_blocks();
 | 
			
		||||
 | 
			
		||||
    bdrv_iterate(init_blk_migration_it, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with no lock taken.  */
 | 
			
		||||
 | 
			
		||||
static int blk_mig_save_bulked_block(QEMUFile *f)
 | 
			
		||||
{
 | 
			
		||||
    int64_t completed_sector_sum = 0;
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    int progress;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        if (bmds->bulk_completed == 0) {
 | 
			
		||||
            if (mig_save_device_bulk(f, bmds) == 1) {
 | 
			
		||||
                /* completed bulk section for this device */
 | 
			
		||||
                bmds->bulk_completed = 1;
 | 
			
		||||
            }
 | 
			
		||||
            completed_sector_sum += bmds->completed_sectors;
 | 
			
		||||
            ret = 1;
 | 
			
		||||
            break;
 | 
			
		||||
        } else {
 | 
			
		||||
            completed_sector_sum += bmds->completed_sectors;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (block_mig_state.total_sector_sum != 0) {
 | 
			
		||||
        progress = completed_sector_sum * 100 /
 | 
			
		||||
                   block_mig_state.total_sector_sum;
 | 
			
		||||
    } else {
 | 
			
		||||
        progress = 100;
 | 
			
		||||
    }
 | 
			
		||||
    if (progress != block_mig_state.prev_progress) {
 | 
			
		||||
        block_mig_state.prev_progress = progress;
 | 
			
		||||
        qemu_put_be64(f, (progress << BDRV_SECTOR_BITS)
 | 
			
		||||
                         | BLK_MIG_FLAG_PROGRESS);
 | 
			
		||||
        DPRINTF("Completed %d %%\r", progress);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blk_mig_reset_dirty_cursor(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        bmds->cur_dirty = 0;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with iothread lock taken.  */
 | 
			
		||||
 | 
			
		||||
static int mig_save_device_dirty(QEMUFile *f, BlkMigDevState *bmds,
 | 
			
		||||
                                 int is_async)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigBlock *blk;
 | 
			
		||||
    int64_t total_sectors = bmds->total_sectors;
 | 
			
		||||
    int64_t sector;
 | 
			
		||||
    int nr_sectors;
 | 
			
		||||
    int ret = -EIO;
 | 
			
		||||
 | 
			
		||||
    for (sector = bmds->cur_dirty; sector < bmds->total_sectors;) {
 | 
			
		||||
        blk_mig_lock();
 | 
			
		||||
        if (bmds_aio_inflight(bmds, sector)) {
 | 
			
		||||
            blk_mig_unlock();
 | 
			
		||||
            bdrv_drain_all();
 | 
			
		||||
        } else {
 | 
			
		||||
            blk_mig_unlock();
 | 
			
		||||
        }
 | 
			
		||||
        if (bdrv_get_dirty(bmds->bs, bmds->dirty_bitmap, sector)) {
 | 
			
		||||
 | 
			
		||||
            if (total_sectors - sector < BDRV_SECTORS_PER_DIRTY_CHUNK) {
 | 
			
		||||
                nr_sectors = total_sectors - sector;
 | 
			
		||||
            } else {
 | 
			
		||||
                nr_sectors = BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
            }
 | 
			
		||||
            blk = g_malloc(sizeof(BlkMigBlock));
 | 
			
		||||
            blk->buf = g_malloc(BLOCK_SIZE);
 | 
			
		||||
            blk->bmds = bmds;
 | 
			
		||||
            blk->sector = sector;
 | 
			
		||||
            blk->nr_sectors = nr_sectors;
 | 
			
		||||
 | 
			
		||||
            if (is_async) {
 | 
			
		||||
                blk->iov.iov_base = blk->buf;
 | 
			
		||||
                blk->iov.iov_len = nr_sectors * BDRV_SECTOR_SIZE;
 | 
			
		||||
                qemu_iovec_init_external(&blk->qiov, &blk->iov, 1);
 | 
			
		||||
 | 
			
		||||
                blk->aiocb = bdrv_aio_readv(bmds->bs, sector, &blk->qiov,
 | 
			
		||||
                                            nr_sectors, blk_mig_read_cb, blk);
 | 
			
		||||
 | 
			
		||||
                blk_mig_lock();
 | 
			
		||||
                block_mig_state.submitted++;
 | 
			
		||||
                bmds_set_aio_inflight(bmds, sector, nr_sectors, 1);
 | 
			
		||||
                blk_mig_unlock();
 | 
			
		||||
            } else {
 | 
			
		||||
                ret = bdrv_read(bmds->bs, sector, blk->buf, nr_sectors);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto error;
 | 
			
		||||
                }
 | 
			
		||||
                blk_send(f, blk);
 | 
			
		||||
 | 
			
		||||
                g_free(blk->buf);
 | 
			
		||||
                g_free(blk);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            bdrv_reset_dirty(bmds->bs, sector, nr_sectors);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        sector += BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
        bmds->cur_dirty = sector;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return (bmds->cur_dirty >= bmds->total_sectors);
 | 
			
		||||
 | 
			
		||||
error:
 | 
			
		||||
    DPRINTF("Error reading sector %" PRId64 "\n", sector);
 | 
			
		||||
    g_free(blk->buf);
 | 
			
		||||
    g_free(blk);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with iothread lock taken.
 | 
			
		||||
 *
 | 
			
		||||
 * return value:
 | 
			
		||||
 * 0: too much data for max_downtime
 | 
			
		||||
 * 1: few enough data for max_downtime
 | 
			
		||||
*/
 | 
			
		||||
static int blk_mig_save_dirty_block(QEMUFile *f, int is_async)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    int ret = 1;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        ret = mig_save_device_dirty(f, bmds, is_async);
 | 
			
		||||
        if (ret <= 0) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with no locks taken.  */
 | 
			
		||||
 | 
			
		||||
static int flush_blks(QEMUFile *f)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigBlock *blk;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("%s Enter submitted %d read_done %d transferred %d\n",
 | 
			
		||||
            __FUNCTION__, block_mig_state.submitted, block_mig_state.read_done,
 | 
			
		||||
            block_mig_state.transferred);
 | 
			
		||||
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    while ((blk = QSIMPLEQ_FIRST(&block_mig_state.blk_list)) != NULL) {
 | 
			
		||||
        if (qemu_file_rate_limit(f)) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        if (blk->ret < 0) {
 | 
			
		||||
            ret = blk->ret;
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        QSIMPLEQ_REMOVE_HEAD(&block_mig_state.blk_list, entry);
 | 
			
		||||
        blk_mig_unlock();
 | 
			
		||||
        blk_send(f, blk);
 | 
			
		||||
        blk_mig_lock();
 | 
			
		||||
 | 
			
		||||
        g_free(blk->buf);
 | 
			
		||||
        g_free(blk);
 | 
			
		||||
 | 
			
		||||
        block_mig_state.read_done--;
 | 
			
		||||
        block_mig_state.transferred++;
 | 
			
		||||
        assert(block_mig_state.read_done >= 0);
 | 
			
		||||
    }
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
 | 
			
		||||
    DPRINTF("%s Exit submitted %d read_done %d transferred %d\n", __FUNCTION__,
 | 
			
		||||
            block_mig_state.submitted, block_mig_state.read_done,
 | 
			
		||||
            block_mig_state.transferred);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with iothread lock taken.  */
 | 
			
		||||
 | 
			
		||||
static int64_t get_remaining_dirty(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    int64_t dirty = 0;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(bmds, &block_mig_state.bmds_list, entry) {
 | 
			
		||||
        dirty += bdrv_get_dirty_count(bmds->bs, bmds->dirty_bitmap);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return dirty << BDRV_SECTOR_BITS;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with iothread lock taken.  */
 | 
			
		||||
 | 
			
		||||
static void blk_mig_cleanup(void)
 | 
			
		||||
{
 | 
			
		||||
    BlkMigDevState *bmds;
 | 
			
		||||
    BlkMigBlock *blk;
 | 
			
		||||
 | 
			
		||||
    bdrv_drain_all();
 | 
			
		||||
 | 
			
		||||
    unset_dirty_tracking();
 | 
			
		||||
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    while ((bmds = QSIMPLEQ_FIRST(&block_mig_state.bmds_list)) != NULL) {
 | 
			
		||||
        QSIMPLEQ_REMOVE_HEAD(&block_mig_state.bmds_list, entry);
 | 
			
		||||
        bdrv_op_unblock_all(bmds->bs, bmds->blocker);
 | 
			
		||||
        error_free(bmds->blocker);
 | 
			
		||||
        bdrv_unref(bmds->bs);
 | 
			
		||||
        g_free(bmds->aio_bitmap);
 | 
			
		||||
        g_free(bmds);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while ((blk = QSIMPLEQ_FIRST(&block_mig_state.blk_list)) != NULL) {
 | 
			
		||||
        QSIMPLEQ_REMOVE_HEAD(&block_mig_state.blk_list, entry);
 | 
			
		||||
        g_free(blk->buf);
 | 
			
		||||
        g_free(blk);
 | 
			
		||||
    }
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void block_migration_cancel(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    blk_mig_cleanup();
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int block_save_setup(QEMUFile *f, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("Enter save live setup submitted %d transferred %d\n",
 | 
			
		||||
            block_mig_state.submitted, block_mig_state.transferred);
 | 
			
		||||
 | 
			
		||||
    qemu_mutex_lock_iothread();
 | 
			
		||||
    init_blk_migration(f);
 | 
			
		||||
 | 
			
		||||
    /* start track dirty blocks */
 | 
			
		||||
    ret = set_dirty_tracking();
 | 
			
		||||
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        qemu_mutex_unlock_iothread();
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_mutex_unlock_iothread();
 | 
			
		||||
 | 
			
		||||
    ret = flush_blks(f);
 | 
			
		||||
    blk_mig_reset_dirty_cursor();
 | 
			
		||||
    qemu_put_be64(f, BLK_MIG_FLAG_EOS);
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int block_save_iterate(QEMUFile *f, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    int64_t last_ftell = qemu_ftell(f);
 | 
			
		||||
 | 
			
		||||
    DPRINTF("Enter save live iterate submitted %d transferred %d\n",
 | 
			
		||||
            block_mig_state.submitted, block_mig_state.transferred);
 | 
			
		||||
 | 
			
		||||
    ret = flush_blks(f);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    blk_mig_reset_dirty_cursor();
 | 
			
		||||
 | 
			
		||||
    /* control the rate of transfer */
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    while ((block_mig_state.submitted +
 | 
			
		||||
            block_mig_state.read_done) * BLOCK_SIZE <
 | 
			
		||||
           qemu_file_get_rate_limit(f)) {
 | 
			
		||||
        blk_mig_unlock();
 | 
			
		||||
        if (block_mig_state.bulk_completed == 0) {
 | 
			
		||||
            /* first finish the bulk phase */
 | 
			
		||||
            if (blk_mig_save_bulked_block(f) == 0) {
 | 
			
		||||
                /* finished saving bulk on all devices */
 | 
			
		||||
                block_mig_state.bulk_completed = 1;
 | 
			
		||||
            }
 | 
			
		||||
            ret = 0;
 | 
			
		||||
        } else {
 | 
			
		||||
            /* Always called with iothread lock taken for
 | 
			
		||||
             * simplicity, block_save_complete also calls it.
 | 
			
		||||
             */
 | 
			
		||||
            qemu_mutex_lock_iothread();
 | 
			
		||||
            ret = blk_mig_save_dirty_block(f, 1);
 | 
			
		||||
            qemu_mutex_unlock_iothread();
 | 
			
		||||
        }
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
        blk_mig_lock();
 | 
			
		||||
        if (ret != 0) {
 | 
			
		||||
            /* no more dirty blocks */
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
 | 
			
		||||
    ret = flush_blks(f);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_put_be64(f, BLK_MIG_FLAG_EOS);
 | 
			
		||||
    return qemu_ftell(f) - last_ftell;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Called with iothread lock taken.  */
 | 
			
		||||
 | 
			
		||||
static int block_save_complete(QEMUFile *f, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("Enter save live complete submitted %d transferred %d\n",
 | 
			
		||||
            block_mig_state.submitted, block_mig_state.transferred);
 | 
			
		||||
 | 
			
		||||
    ret = flush_blks(f);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    blk_mig_reset_dirty_cursor();
 | 
			
		||||
 | 
			
		||||
    /* we know for sure that save bulk is completed and
 | 
			
		||||
       all async read completed */
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    assert(block_mig_state.submitted == 0);
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        ret = blk_mig_save_dirty_block(f, 0);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
    } while (ret == 0);
 | 
			
		||||
 | 
			
		||||
    /* report completion */
 | 
			
		||||
    qemu_put_be64(f, (100 << BDRV_SECTOR_BITS) | BLK_MIG_FLAG_PROGRESS);
 | 
			
		||||
 | 
			
		||||
    DPRINTF("Block migration completed\n");
 | 
			
		||||
 | 
			
		||||
    qemu_put_be64(f, BLK_MIG_FLAG_EOS);
 | 
			
		||||
 | 
			
		||||
    blk_mig_cleanup();
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static uint64_t block_save_pending(QEMUFile *f, void *opaque, uint64_t max_size)
 | 
			
		||||
{
 | 
			
		||||
    /* Estimate pending number of bytes to send */
 | 
			
		||||
    uint64_t pending;
 | 
			
		||||
 | 
			
		||||
    qemu_mutex_lock_iothread();
 | 
			
		||||
    blk_mig_lock();
 | 
			
		||||
    pending = get_remaining_dirty() +
 | 
			
		||||
                       block_mig_state.submitted * BLOCK_SIZE +
 | 
			
		||||
                       block_mig_state.read_done * BLOCK_SIZE;
 | 
			
		||||
 | 
			
		||||
    /* Report at least one block pending during bulk phase */
 | 
			
		||||
    if (pending == 0 && !block_mig_state.bulk_completed) {
 | 
			
		||||
        pending = BLOCK_SIZE;
 | 
			
		||||
    }
 | 
			
		||||
    blk_mig_unlock();
 | 
			
		||||
    qemu_mutex_unlock_iothread();
 | 
			
		||||
 | 
			
		||||
    DPRINTF("Enter save live pending  %" PRIu64 "\n", pending);
 | 
			
		||||
    return pending;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int block_load(QEMUFile *f, void *opaque, int version_id)
 | 
			
		||||
{
 | 
			
		||||
    static int banner_printed;
 | 
			
		||||
    int len, flags;
 | 
			
		||||
    char device_name[256];
 | 
			
		||||
    int64_t addr;
 | 
			
		||||
    BlockDriverState *bs, *bs_prev = NULL;
 | 
			
		||||
    uint8_t *buf;
 | 
			
		||||
    int64_t total_sectors = 0;
 | 
			
		||||
    int nr_sectors;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        addr = qemu_get_be64(f);
 | 
			
		||||
 | 
			
		||||
        flags = addr & ~BDRV_SECTOR_MASK;
 | 
			
		||||
        addr >>= BDRV_SECTOR_BITS;
 | 
			
		||||
 | 
			
		||||
        if (flags & BLK_MIG_FLAG_DEVICE_BLOCK) {
 | 
			
		||||
            /* get device name */
 | 
			
		||||
            len = qemu_get_byte(f);
 | 
			
		||||
            qemu_get_buffer(f, (uint8_t *)device_name, len);
 | 
			
		||||
            device_name[len] = '\0';
 | 
			
		||||
 | 
			
		||||
            bs = bdrv_find(device_name);
 | 
			
		||||
            if (!bs) {
 | 
			
		||||
                fprintf(stderr, "Error unknown block device %s\n",
 | 
			
		||||
                        device_name);
 | 
			
		||||
                return -EINVAL;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (bs != bs_prev) {
 | 
			
		||||
                bs_prev = bs;
 | 
			
		||||
                total_sectors = bdrv_getlength(bs) >> BDRV_SECTOR_BITS;
 | 
			
		||||
                if (total_sectors <= 0) {
 | 
			
		||||
                    error_report("Error getting length of block device %s",
 | 
			
		||||
                                 device_name);
 | 
			
		||||
                    return -EINVAL;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (total_sectors - addr < BDRV_SECTORS_PER_DIRTY_CHUNK) {
 | 
			
		||||
                nr_sectors = total_sectors - addr;
 | 
			
		||||
            } else {
 | 
			
		||||
                nr_sectors = BDRV_SECTORS_PER_DIRTY_CHUNK;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (flags & BLK_MIG_FLAG_ZERO_BLOCK) {
 | 
			
		||||
                ret = bdrv_write_zeroes(bs, addr, nr_sectors,
 | 
			
		||||
                                        BDRV_REQ_MAY_UNMAP);
 | 
			
		||||
            } else {
 | 
			
		||||
                buf = g_malloc(BLOCK_SIZE);
 | 
			
		||||
                qemu_get_buffer(f, buf, BLOCK_SIZE);
 | 
			
		||||
                ret = bdrv_write(bs, addr, buf, nr_sectors);
 | 
			
		||||
                g_free(buf);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                return ret;
 | 
			
		||||
            }
 | 
			
		||||
        } else if (flags & BLK_MIG_FLAG_PROGRESS) {
 | 
			
		||||
            if (!banner_printed) {
 | 
			
		||||
                printf("Receiving block device images\n");
 | 
			
		||||
                banner_printed = 1;
 | 
			
		||||
            }
 | 
			
		||||
            printf("Completed %d %%%c", (int)addr,
 | 
			
		||||
                   (addr == 100) ? '\n' : '\r');
 | 
			
		||||
            fflush(stdout);
 | 
			
		||||
        } else if (!(flags & BLK_MIG_FLAG_EOS)) {
 | 
			
		||||
            fprintf(stderr, "Unknown block migration flags: %#x\n", flags);
 | 
			
		||||
            return -EINVAL;
 | 
			
		||||
        }
 | 
			
		||||
        ret = qemu_file_get_error(f);
 | 
			
		||||
        if (ret != 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
    } while (!(flags & BLK_MIG_FLAG_EOS));
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void block_set_params(const MigrationParams *params, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    block_mig_state.blk_enable = params->blk;
 | 
			
		||||
    block_mig_state.shared_base = params->shared;
 | 
			
		||||
 | 
			
		||||
    /* shared base means that blk_enable = 1 */
 | 
			
		||||
    block_mig_state.blk_enable |= params->shared;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool block_is_active(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    return block_mig_state.blk_enable == 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static SaveVMHandlers savevm_block_handlers = {
 | 
			
		||||
    .set_params = block_set_params,
 | 
			
		||||
    .save_live_setup = block_save_setup,
 | 
			
		||||
    .save_live_iterate = block_save_iterate,
 | 
			
		||||
    .save_live_complete = block_save_complete,
 | 
			
		||||
    .save_live_pending = block_save_pending,
 | 
			
		||||
    .load_state = block_load,
 | 
			
		||||
    .cancel = block_migration_cancel,
 | 
			
		||||
    .is_active = block_is_active,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
void blk_mig_init(void)
 | 
			
		||||
{
 | 
			
		||||
    QSIMPLEQ_INIT(&block_mig_state.bmds_list);
 | 
			
		||||
    QSIMPLEQ_INIT(&block_mig_state.blk_list);
 | 
			
		||||
    qemu_mutex_init(&block_mig_state.lock);
 | 
			
		||||
 | 
			
		||||
    register_savevm_live(NULL, "block", 0, 1, &savevm_block_handlers,
 | 
			
		||||
                         &block_mig_state);
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										189
									
								
								block-nbd.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										189
									
								
								block-nbd.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,189 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for  NBD
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2008 Bull S.A.S.
 | 
			
		||||
 *     Author: Laurent Vivier <Laurent.Vivier@bull.net>
 | 
			
		||||
 *
 | 
			
		||||
 * Some parts:
 | 
			
		||||
 *    Copyright (C) 2007 Anthony Liguori <anthony@codemonkey.ws>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "nbd.h"
 | 
			
		||||
 | 
			
		||||
#include <sys/types.h>
 | 
			
		||||
#include <unistd.h>
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVNBDState {
 | 
			
		||||
    int sock;
 | 
			
		||||
    off_t size;
 | 
			
		||||
    size_t blocksize;
 | 
			
		||||
} BDRVNBDState;
 | 
			
		||||
 | 
			
		||||
static int nbd_open(BlockDriverState *bs, const char* filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
    const char *host;
 | 
			
		||||
    const char *unixpath;
 | 
			
		||||
    int sock;
 | 
			
		||||
    off_t size;
 | 
			
		||||
    size_t blocksize;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    if ((flags & BDRV_O_CREAT))
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
 | 
			
		||||
    if (!strstart(filename, "nbd:", &host))
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
 | 
			
		||||
    if (strstart(host, "unix:", &unixpath)) {
 | 
			
		||||
 | 
			
		||||
        if (unixpath[0] != '/')
 | 
			
		||||
            return -EINVAL;
 | 
			
		||||
 | 
			
		||||
        sock = unix_socket_outgoing(unixpath);
 | 
			
		||||
 | 
			
		||||
    } else {
 | 
			
		||||
        uint16_t port;
 | 
			
		||||
        char *p, *r;
 | 
			
		||||
        char hostname[128];
 | 
			
		||||
 | 
			
		||||
        pstrcpy(hostname, 128, host);
 | 
			
		||||
 | 
			
		||||
        p = strchr(hostname, ':');
 | 
			
		||||
        if (p == NULL)
 | 
			
		||||
            return -EINVAL;
 | 
			
		||||
 | 
			
		||||
        *p = '\0';
 | 
			
		||||
        p++;
 | 
			
		||||
 | 
			
		||||
        port = strtol(p, &r, 0);
 | 
			
		||||
        if (r == p)
 | 
			
		||||
            return -EINVAL;
 | 
			
		||||
        sock = tcp_socket_outgoing(hostname, port);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (sock == -1)
 | 
			
		||||
        return -errno;
 | 
			
		||||
 | 
			
		||||
    ret = nbd_receive_negotiate(sock, &size, &blocksize);
 | 
			
		||||
    if (ret == -1)
 | 
			
		||||
        return -errno;
 | 
			
		||||
 | 
			
		||||
    s->sock = sock;
 | 
			
		||||
    s->size = size;
 | 
			
		||||
    s->blocksize = blocksize;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
    struct nbd_request request;
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
 | 
			
		||||
    request.type = NBD_CMD_READ;
 | 
			
		||||
    request.handle = (uint64_t)(intptr_t)bs;
 | 
			
		||||
    request.from = sector_num * 512;;
 | 
			
		||||
    request.len = nb_sectors * 512;
 | 
			
		||||
 | 
			
		||||
    if (nbd_send_request(s->sock, &request) == -1)
 | 
			
		||||
        return -errno;
 | 
			
		||||
 | 
			
		||||
    if (nbd_receive_reply(s->sock, &reply) == -1)
 | 
			
		||||
        return -errno;
 | 
			
		||||
 | 
			
		||||
    if (reply.error !=0)
 | 
			
		||||
        return -reply.error;
 | 
			
		||||
 | 
			
		||||
    if (reply.handle != request.handle)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    if (nbd_wr_sync(s->sock, buf, request.len, 1) != request.len)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                     const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
    struct nbd_request request;
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
 | 
			
		||||
    request.type = NBD_CMD_WRITE;
 | 
			
		||||
    request.handle = (uint64_t)(intptr_t)bs;
 | 
			
		||||
    request.from = sector_num * 512;;
 | 
			
		||||
    request.len = nb_sectors * 512;
 | 
			
		||||
 | 
			
		||||
    if (nbd_send_request(s->sock, &request) == -1)
 | 
			
		||||
        return -errno;
 | 
			
		||||
 | 
			
		||||
    if (nbd_wr_sync(s->sock, (uint8_t*)buf, request.len, 0) != request.len)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    if (nbd_receive_reply(s->sock, &reply) == -1)
 | 
			
		||||
        return -errno;
 | 
			
		||||
 | 
			
		||||
    if (reply.error !=0)
 | 
			
		||||
        return -reply.error;
 | 
			
		||||
 | 
			
		||||
    if (reply.handle != request.handle)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
    struct nbd_request request;
 | 
			
		||||
 | 
			
		||||
    request.type = NBD_CMD_DISC;
 | 
			
		||||
    request.handle = (uint64_t)(intptr_t)bs;
 | 
			
		||||
    request.from = 0;
 | 
			
		||||
    request.len = 0;
 | 
			
		||||
    nbd_send_request(s->sock, &request);
 | 
			
		||||
 | 
			
		||||
    close(s->sock);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t nbd_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return s->size;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_nbd = {
 | 
			
		||||
    "nbd",
 | 
			
		||||
    sizeof(BDRVNBDState),
 | 
			
		||||
    NULL, /* no probe for protocols */
 | 
			
		||||
    nbd_open,
 | 
			
		||||
    nbd_read,
 | 
			
		||||
    nbd_write,
 | 
			
		||||
    nbd_close,
 | 
			
		||||
    .bdrv_getlength = nbd_getlength,
 | 
			
		||||
    .protocol_name = "nbd",
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										174
									
								
								block-parallels.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										174
									
								
								block-parallels.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,174 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for Parallels disk image format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2007 Alex Beregszaszi
 | 
			
		||||
 *
 | 
			
		||||
 * This code is based on comparing different disk images created by Parallels.
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
 | 
			
		||||
#define HEADER_MAGIC "WithoutFreeSpace"
 | 
			
		||||
#define HEADER_VERSION 2
 | 
			
		||||
#define HEADER_SIZE 64
 | 
			
		||||
 | 
			
		||||
// always little-endian
 | 
			
		||||
struct parallels_header {
 | 
			
		||||
    char magic[16]; // "WithoutFreeSpace"
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t heads;
 | 
			
		||||
    uint32_t cylinders;
 | 
			
		||||
    uint32_t tracks;
 | 
			
		||||
    uint32_t catalog_entries;
 | 
			
		||||
    uint32_t nb_sectors;
 | 
			
		||||
    char padding[24];
 | 
			
		||||
} __attribute__((packed));
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVParallelsState {
 | 
			
		||||
    int fd;
 | 
			
		||||
 | 
			
		||||
    uint32_t *catalog_bitmap;
 | 
			
		||||
    int catalog_size;
 | 
			
		||||
 | 
			
		||||
    int tracks;
 | 
			
		||||
} BDRVParallelsState;
 | 
			
		||||
 | 
			
		||||
static int parallels_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const struct parallels_header *ph = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size < HEADER_SIZE)
 | 
			
		||||
	return 0;
 | 
			
		||||
 | 
			
		||||
    if (!memcmp(ph->magic, HEADER_MAGIC, 16) &&
 | 
			
		||||
	(le32_to_cpu(ph->version) == HEADER_VERSION))
 | 
			
		||||
	return 100;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int parallels_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    int fd, i;
 | 
			
		||||
    struct parallels_header ph;
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_RDWR | O_BINARY | O_LARGEFILE);
 | 
			
		||||
    if (fd < 0) {
 | 
			
		||||
        fd = open(filename, O_RDONLY | O_BINARY | O_LARGEFILE);
 | 
			
		||||
        if (fd < 0)
 | 
			
		||||
            return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bs->read_only = 1; // no write support yet
 | 
			
		||||
 | 
			
		||||
    s->fd = fd;
 | 
			
		||||
 | 
			
		||||
    if (read(fd, &ph, sizeof(ph)) != sizeof(ph))
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    if (memcmp(ph.magic, HEADER_MAGIC, 16) ||
 | 
			
		||||
	(le32_to_cpu(ph.version) != HEADER_VERSION)) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bs->total_sectors = le32_to_cpu(ph.nb_sectors);
 | 
			
		||||
 | 
			
		||||
    if (lseek(s->fd, 64, SEEK_SET) != 64)
 | 
			
		||||
	goto fail;
 | 
			
		||||
 | 
			
		||||
    s->tracks = le32_to_cpu(ph.tracks);
 | 
			
		||||
 | 
			
		||||
    s->catalog_size = le32_to_cpu(ph.catalog_entries);
 | 
			
		||||
    s->catalog_bitmap = qemu_malloc(s->catalog_size * 4);
 | 
			
		||||
    if (read(s->fd, s->catalog_bitmap, s->catalog_size * 4) !=
 | 
			
		||||
	s->catalog_size * 4)
 | 
			
		||||
	goto fail;
 | 
			
		||||
    for (i = 0; i < s->catalog_size; i++)
 | 
			
		||||
	le32_to_cpus(&s->catalog_bitmap[i]);
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
fail:
 | 
			
		||||
    if (s->catalog_bitmap)
 | 
			
		||||
	qemu_free(s->catalog_bitmap);
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int seek_to_sector(BlockDriverState *bs, int64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    uint32_t index, offset, position;
 | 
			
		||||
 | 
			
		||||
    index = sector_num / s->tracks;
 | 
			
		||||
    offset = sector_num % s->tracks;
 | 
			
		||||
 | 
			
		||||
    // not allocated
 | 
			
		||||
    if ((index > s->catalog_size) || (s->catalog_bitmap[index] == 0))
 | 
			
		||||
	return -1;
 | 
			
		||||
 | 
			
		||||
    position = (s->catalog_bitmap[index] + offset) * 512;
 | 
			
		||||
 | 
			
		||||
//    fprintf(stderr, "sector: %llx index=%x offset=%x pointer=%x position=%x\n",
 | 
			
		||||
//	sector_num, index, offset, s->catalog_bitmap[index], position);
 | 
			
		||||
 | 
			
		||||
    if (lseek(s->fd, position, SEEK_SET) != position)
 | 
			
		||||
	return -1;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int parallels_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
	if (!seek_to_sector(bs, sector_num)) {
 | 
			
		||||
	    if (read(s->fd, buf, 512) != 512)
 | 
			
		||||
		return -1;
 | 
			
		||||
	} else
 | 
			
		||||
            memset(buf, 0, 512);
 | 
			
		||||
        nb_sectors--;
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void parallels_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    qemu_free(s->catalog_bitmap);
 | 
			
		||||
    close(s->fd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_parallels = {
 | 
			
		||||
    "parallels",
 | 
			
		||||
    sizeof(BDRVParallelsState),
 | 
			
		||||
    parallels_probe,
 | 
			
		||||
    parallels_open,
 | 
			
		||||
    parallels_read,
 | 
			
		||||
    NULL,
 | 
			
		||||
    parallels_close,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										909
									
								
								block-qcow.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										909
									
								
								block-qcow.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,909 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the QCOW format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004-2006 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
#include <zlib.h>
 | 
			
		||||
#include "aes.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
/* QEMU COW block driver with compression and encryption support */
 | 
			
		||||
 | 
			
		||||
#define QCOW_MAGIC (('Q' << 24) | ('F' << 16) | ('I' << 8) | 0xfb)
 | 
			
		||||
#define QCOW_VERSION 1
 | 
			
		||||
 | 
			
		||||
#define QCOW_CRYPT_NONE 0
 | 
			
		||||
#define QCOW_CRYPT_AES  1
 | 
			
		||||
 | 
			
		||||
#define QCOW_OFLAG_COMPRESSED (1LL << 63)
 | 
			
		||||
 | 
			
		||||
typedef struct QCowHeader {
 | 
			
		||||
    uint32_t magic;
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint64_t backing_file_offset;
 | 
			
		||||
    uint32_t backing_file_size;
 | 
			
		||||
    uint32_t mtime;
 | 
			
		||||
    uint64_t size; /* in bytes */
 | 
			
		||||
    uint8_t cluster_bits;
 | 
			
		||||
    uint8_t l2_bits;
 | 
			
		||||
    uint32_t crypt_method;
 | 
			
		||||
    uint64_t l1_table_offset;
 | 
			
		||||
} QCowHeader;
 | 
			
		||||
 | 
			
		||||
#define L2_CACHE_SIZE 16
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVQcowState {
 | 
			
		||||
    BlockDriverState *hd;
 | 
			
		||||
    int cluster_bits;
 | 
			
		||||
    int cluster_size;
 | 
			
		||||
    int cluster_sectors;
 | 
			
		||||
    int l2_bits;
 | 
			
		||||
    int l2_size;
 | 
			
		||||
    int l1_size;
 | 
			
		||||
    uint64_t cluster_offset_mask;
 | 
			
		||||
    uint64_t l1_table_offset;
 | 
			
		||||
    uint64_t *l1_table;
 | 
			
		||||
    uint64_t *l2_cache;
 | 
			
		||||
    uint64_t l2_cache_offsets[L2_CACHE_SIZE];
 | 
			
		||||
    uint32_t l2_cache_counts[L2_CACHE_SIZE];
 | 
			
		||||
    uint8_t *cluster_cache;
 | 
			
		||||
    uint8_t *cluster_data;
 | 
			
		||||
    uint64_t cluster_cache_offset;
 | 
			
		||||
    uint32_t crypt_method; /* current crypt method, 0 if no key yet */
 | 
			
		||||
    uint32_t crypt_method_header;
 | 
			
		||||
    AES_KEY aes_encrypt_key;
 | 
			
		||||
    AES_KEY aes_decrypt_key;
 | 
			
		||||
} BDRVQcowState;
 | 
			
		||||
 | 
			
		||||
static int decompress_cluster(BDRVQcowState *s, uint64_t cluster_offset);
 | 
			
		||||
 | 
			
		||||
static int qcow_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const QCowHeader *cow_header = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size >= sizeof(QCowHeader) &&
 | 
			
		||||
        be32_to_cpu(cow_header->magic) == QCOW_MAGIC &&
 | 
			
		||||
        be32_to_cpu(cow_header->version) == QCOW_VERSION)
 | 
			
		||||
        return 100;
 | 
			
		||||
    else
 | 
			
		||||
        return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int len, i, shift, ret;
 | 
			
		||||
    QCowHeader header;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_file_open(&s->hd, filename, flags);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        return ret;
 | 
			
		||||
    if (bdrv_pread(s->hd, 0, &header, sizeof(header)) != sizeof(header))
 | 
			
		||||
        goto fail;
 | 
			
		||||
    be32_to_cpus(&header.magic);
 | 
			
		||||
    be32_to_cpus(&header.version);
 | 
			
		||||
    be64_to_cpus(&header.backing_file_offset);
 | 
			
		||||
    be32_to_cpus(&header.backing_file_size);
 | 
			
		||||
    be32_to_cpus(&header.mtime);
 | 
			
		||||
    be64_to_cpus(&header.size);
 | 
			
		||||
    be32_to_cpus(&header.crypt_method);
 | 
			
		||||
    be64_to_cpus(&header.l1_table_offset);
 | 
			
		||||
 | 
			
		||||
    if (header.magic != QCOW_MAGIC || header.version != QCOW_VERSION)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (header.size <= 1 || header.cluster_bits < 9)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (header.crypt_method > QCOW_CRYPT_AES)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    s->crypt_method_header = header.crypt_method;
 | 
			
		||||
    if (s->crypt_method_header)
 | 
			
		||||
        bs->encrypted = 1;
 | 
			
		||||
    s->cluster_bits = header.cluster_bits;
 | 
			
		||||
    s->cluster_size = 1 << s->cluster_bits;
 | 
			
		||||
    s->cluster_sectors = 1 << (s->cluster_bits - 9);
 | 
			
		||||
    s->l2_bits = header.l2_bits;
 | 
			
		||||
    s->l2_size = 1 << s->l2_bits;
 | 
			
		||||
    bs->total_sectors = header.size / 512;
 | 
			
		||||
    s->cluster_offset_mask = (1LL << (63 - s->cluster_bits)) - 1;
 | 
			
		||||
 | 
			
		||||
    /* read the level 1 table */
 | 
			
		||||
    shift = s->cluster_bits + s->l2_bits;
 | 
			
		||||
    s->l1_size = (header.size + (1LL << shift) - 1) >> shift;
 | 
			
		||||
 | 
			
		||||
    s->l1_table_offset = header.l1_table_offset;
 | 
			
		||||
    s->l1_table = qemu_malloc(s->l1_size * sizeof(uint64_t));
 | 
			
		||||
    if (!s->l1_table)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (bdrv_pread(s->hd, s->l1_table_offset, s->l1_table, s->l1_size * sizeof(uint64_t)) !=
 | 
			
		||||
        s->l1_size * sizeof(uint64_t))
 | 
			
		||||
        goto fail;
 | 
			
		||||
    for(i = 0;i < s->l1_size; i++) {
 | 
			
		||||
        be64_to_cpus(&s->l1_table[i]);
 | 
			
		||||
    }
 | 
			
		||||
    /* alloc L2 cache */
 | 
			
		||||
    s->l2_cache = qemu_malloc(s->l2_size * L2_CACHE_SIZE * sizeof(uint64_t));
 | 
			
		||||
    if (!s->l2_cache)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    s->cluster_cache = qemu_malloc(s->cluster_size);
 | 
			
		||||
    if (!s->cluster_cache)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    s->cluster_data = qemu_malloc(s->cluster_size);
 | 
			
		||||
    if (!s->cluster_data)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    s->cluster_cache_offset = -1;
 | 
			
		||||
 | 
			
		||||
    /* read the backing file name */
 | 
			
		||||
    if (header.backing_file_offset != 0) {
 | 
			
		||||
        len = header.backing_file_size;
 | 
			
		||||
        if (len > 1023)
 | 
			
		||||
            len = 1023;
 | 
			
		||||
        if (bdrv_pread(s->hd, header.backing_file_offset, bs->backing_file, len) != len)
 | 
			
		||||
            goto fail;
 | 
			
		||||
        bs->backing_file[len] = '\0';
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 fail:
 | 
			
		||||
    qemu_free(s->l1_table);
 | 
			
		||||
    qemu_free(s->l2_cache);
 | 
			
		||||
    qemu_free(s->cluster_cache);
 | 
			
		||||
    qemu_free(s->cluster_data);
 | 
			
		||||
    bdrv_delete(s->hd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_set_key(BlockDriverState *bs, const char *key)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    uint8_t keybuf[16];
 | 
			
		||||
    int len, i;
 | 
			
		||||
 | 
			
		||||
    memset(keybuf, 0, 16);
 | 
			
		||||
    len = strlen(key);
 | 
			
		||||
    if (len > 16)
 | 
			
		||||
        len = 16;
 | 
			
		||||
    /* XXX: we could compress the chars to 7 bits to increase
 | 
			
		||||
       entropy */
 | 
			
		||||
    for(i = 0;i < len;i++) {
 | 
			
		||||
        keybuf[i] = key[i];
 | 
			
		||||
    }
 | 
			
		||||
    s->crypt_method = s->crypt_method_header;
 | 
			
		||||
 | 
			
		||||
    if (AES_set_encrypt_key(keybuf, 128, &s->aes_encrypt_key) != 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    if (AES_set_decrypt_key(keybuf, 128, &s->aes_decrypt_key) != 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
#if 0
 | 
			
		||||
    /* test */
 | 
			
		||||
    {
 | 
			
		||||
        uint8_t in[16];
 | 
			
		||||
        uint8_t out[16];
 | 
			
		||||
        uint8_t tmp[16];
 | 
			
		||||
        for(i=0;i<16;i++)
 | 
			
		||||
            in[i] = i;
 | 
			
		||||
        AES_encrypt(in, tmp, &s->aes_encrypt_key);
 | 
			
		||||
        AES_decrypt(tmp, out, &s->aes_decrypt_key);
 | 
			
		||||
        for(i = 0; i < 16; i++)
 | 
			
		||||
            printf(" %02x", tmp[i]);
 | 
			
		||||
        printf("\n");
 | 
			
		||||
        for(i = 0; i < 16; i++)
 | 
			
		||||
            printf(" %02x", out[i]);
 | 
			
		||||
        printf("\n");
 | 
			
		||||
    }
 | 
			
		||||
#endif
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* The crypt function is compatible with the linux cryptoloop
 | 
			
		||||
   algorithm for < 4 GB images. NOTE: out_buf == in_buf is
 | 
			
		||||
   supported */
 | 
			
		||||
static void encrypt_sectors(BDRVQcowState *s, int64_t sector_num,
 | 
			
		||||
                            uint8_t *out_buf, const uint8_t *in_buf,
 | 
			
		||||
                            int nb_sectors, int enc,
 | 
			
		||||
                            const AES_KEY *key)
 | 
			
		||||
{
 | 
			
		||||
    union {
 | 
			
		||||
        uint64_t ll[2];
 | 
			
		||||
        uint8_t b[16];
 | 
			
		||||
    } ivec;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for(i = 0; i < nb_sectors; i++) {
 | 
			
		||||
        ivec.ll[0] = cpu_to_le64(sector_num);
 | 
			
		||||
        ivec.ll[1] = 0;
 | 
			
		||||
        AES_cbc_encrypt(in_buf, out_buf, 512, key,
 | 
			
		||||
                        ivec.b, enc);
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        in_buf += 512;
 | 
			
		||||
        out_buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* 'allocate' is:
 | 
			
		||||
 *
 | 
			
		||||
 * 0 to not allocate.
 | 
			
		||||
 *
 | 
			
		||||
 * 1 to allocate a normal cluster (for sector indexes 'n_start' to
 | 
			
		||||
 * 'n_end')
 | 
			
		||||
 *
 | 
			
		||||
 * 2 to allocate a compressed cluster of size
 | 
			
		||||
 * 'compressed_size'. 'compressed_size' must be > 0 and <
 | 
			
		||||
 * cluster_size
 | 
			
		||||
 *
 | 
			
		||||
 * return 0 if not allocated.
 | 
			
		||||
 */
 | 
			
		||||
static uint64_t get_cluster_offset(BlockDriverState *bs,
 | 
			
		||||
                                   uint64_t offset, int allocate,
 | 
			
		||||
                                   int compressed_size,
 | 
			
		||||
                                   int n_start, int n_end)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int min_index, i, j, l1_index, l2_index;
 | 
			
		||||
    uint64_t l2_offset, *l2_table, cluster_offset, tmp;
 | 
			
		||||
    uint32_t min_count;
 | 
			
		||||
    int new_l2_table;
 | 
			
		||||
 | 
			
		||||
    l1_index = offset >> (s->l2_bits + s->cluster_bits);
 | 
			
		||||
    l2_offset = s->l1_table[l1_index];
 | 
			
		||||
    new_l2_table = 0;
 | 
			
		||||
    if (!l2_offset) {
 | 
			
		||||
        if (!allocate)
 | 
			
		||||
            return 0;
 | 
			
		||||
        /* allocate a new l2 entry */
 | 
			
		||||
        l2_offset = bdrv_getlength(s->hd);
 | 
			
		||||
        /* round to cluster size */
 | 
			
		||||
        l2_offset = (l2_offset + s->cluster_size - 1) & ~(s->cluster_size - 1);
 | 
			
		||||
        /* update the L1 entry */
 | 
			
		||||
        s->l1_table[l1_index] = l2_offset;
 | 
			
		||||
        tmp = cpu_to_be64(l2_offset);
 | 
			
		||||
        if (bdrv_pwrite(s->hd, s->l1_table_offset + l1_index * sizeof(tmp),
 | 
			
		||||
                        &tmp, sizeof(tmp)) != sizeof(tmp))
 | 
			
		||||
            return 0;
 | 
			
		||||
        new_l2_table = 1;
 | 
			
		||||
    }
 | 
			
		||||
    for(i = 0; i < L2_CACHE_SIZE; i++) {
 | 
			
		||||
        if (l2_offset == s->l2_cache_offsets[i]) {
 | 
			
		||||
            /* increment the hit count */
 | 
			
		||||
            if (++s->l2_cache_counts[i] == 0xffffffff) {
 | 
			
		||||
                for(j = 0; j < L2_CACHE_SIZE; j++) {
 | 
			
		||||
                    s->l2_cache_counts[j] >>= 1;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
            l2_table = s->l2_cache + (i << s->l2_bits);
 | 
			
		||||
            goto found;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    /* not found: load a new entry in the least used one */
 | 
			
		||||
    min_index = 0;
 | 
			
		||||
    min_count = 0xffffffff;
 | 
			
		||||
    for(i = 0; i < L2_CACHE_SIZE; i++) {
 | 
			
		||||
        if (s->l2_cache_counts[i] < min_count) {
 | 
			
		||||
            min_count = s->l2_cache_counts[i];
 | 
			
		||||
            min_index = i;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    l2_table = s->l2_cache + (min_index << s->l2_bits);
 | 
			
		||||
    if (new_l2_table) {
 | 
			
		||||
        memset(l2_table, 0, s->l2_size * sizeof(uint64_t));
 | 
			
		||||
        if (bdrv_pwrite(s->hd, l2_offset, l2_table, s->l2_size * sizeof(uint64_t)) !=
 | 
			
		||||
            s->l2_size * sizeof(uint64_t))
 | 
			
		||||
            return 0;
 | 
			
		||||
    } else {
 | 
			
		||||
        if (bdrv_pread(s->hd, l2_offset, l2_table, s->l2_size * sizeof(uint64_t)) !=
 | 
			
		||||
            s->l2_size * sizeof(uint64_t))
 | 
			
		||||
            return 0;
 | 
			
		||||
    }
 | 
			
		||||
    s->l2_cache_offsets[min_index] = l2_offset;
 | 
			
		||||
    s->l2_cache_counts[min_index] = 1;
 | 
			
		||||
 found:
 | 
			
		||||
    l2_index = (offset >> s->cluster_bits) & (s->l2_size - 1);
 | 
			
		||||
    cluster_offset = be64_to_cpu(l2_table[l2_index]);
 | 
			
		||||
    if (!cluster_offset ||
 | 
			
		||||
        ((cluster_offset & QCOW_OFLAG_COMPRESSED) && allocate == 1)) {
 | 
			
		||||
        if (!allocate)
 | 
			
		||||
            return 0;
 | 
			
		||||
        /* allocate a new cluster */
 | 
			
		||||
        if ((cluster_offset & QCOW_OFLAG_COMPRESSED) &&
 | 
			
		||||
            (n_end - n_start) < s->cluster_sectors) {
 | 
			
		||||
            /* if the cluster is already compressed, we must
 | 
			
		||||
               decompress it in the case it is not completely
 | 
			
		||||
               overwritten */
 | 
			
		||||
            if (decompress_cluster(s, cluster_offset) < 0)
 | 
			
		||||
                return 0;
 | 
			
		||||
            cluster_offset = bdrv_getlength(s->hd);
 | 
			
		||||
            cluster_offset = (cluster_offset + s->cluster_size - 1) &
 | 
			
		||||
                ~(s->cluster_size - 1);
 | 
			
		||||
            /* write the cluster content */
 | 
			
		||||
            if (bdrv_pwrite(s->hd, cluster_offset, s->cluster_cache, s->cluster_size) !=
 | 
			
		||||
                s->cluster_size)
 | 
			
		||||
                return -1;
 | 
			
		||||
        } else {
 | 
			
		||||
            cluster_offset = bdrv_getlength(s->hd);
 | 
			
		||||
            if (allocate == 1) {
 | 
			
		||||
                /* round to cluster size */
 | 
			
		||||
                cluster_offset = (cluster_offset + s->cluster_size - 1) &
 | 
			
		||||
                    ~(s->cluster_size - 1);
 | 
			
		||||
                bdrv_truncate(s->hd, cluster_offset + s->cluster_size);
 | 
			
		||||
                /* if encrypted, we must initialize the cluster
 | 
			
		||||
                   content which won't be written */
 | 
			
		||||
                if (s->crypt_method &&
 | 
			
		||||
                    (n_end - n_start) < s->cluster_sectors) {
 | 
			
		||||
                    uint64_t start_sect;
 | 
			
		||||
                    start_sect = (offset & ~(s->cluster_size - 1)) >> 9;
 | 
			
		||||
                    memset(s->cluster_data + 512, 0x00, 512);
 | 
			
		||||
                    for(i = 0; i < s->cluster_sectors; i++) {
 | 
			
		||||
                        if (i < n_start || i >= n_end) {
 | 
			
		||||
                            encrypt_sectors(s, start_sect + i,
 | 
			
		||||
                                            s->cluster_data,
 | 
			
		||||
                                            s->cluster_data + 512, 1, 1,
 | 
			
		||||
                                            &s->aes_encrypt_key);
 | 
			
		||||
                            if (bdrv_pwrite(s->hd, cluster_offset + i * 512,
 | 
			
		||||
                                            s->cluster_data, 512) != 512)
 | 
			
		||||
                                return -1;
 | 
			
		||||
                        }
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
            } else if (allocate == 2) {
 | 
			
		||||
                cluster_offset |= QCOW_OFLAG_COMPRESSED |
 | 
			
		||||
                    (uint64_t)compressed_size << (63 - s->cluster_bits);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        /* update L2 table */
 | 
			
		||||
        tmp = cpu_to_be64(cluster_offset);
 | 
			
		||||
        l2_table[l2_index] = tmp;
 | 
			
		||||
        if (bdrv_pwrite(s->hd,
 | 
			
		||||
                        l2_offset + l2_index * sizeof(tmp), &tmp, sizeof(tmp)) != sizeof(tmp))
 | 
			
		||||
            return 0;
 | 
			
		||||
    }
 | 
			
		||||
    return cluster_offset;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_is_allocated(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                             int nb_sectors, int *pnum)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    cluster_offset = get_cluster_offset(bs, sector_num << 9, 0, 0, 0, 0);
 | 
			
		||||
    index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
    n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
    if (n > nb_sectors)
 | 
			
		||||
        n = nb_sectors;
 | 
			
		||||
    *pnum = n;
 | 
			
		||||
    return (cluster_offset != 0);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int decompress_buffer(uint8_t *out_buf, int out_buf_size,
 | 
			
		||||
                             const uint8_t *buf, int buf_size)
 | 
			
		||||
{
 | 
			
		||||
    z_stream strm1, *strm = &strm1;
 | 
			
		||||
    int ret, out_len;
 | 
			
		||||
 | 
			
		||||
    memset(strm, 0, sizeof(*strm));
 | 
			
		||||
 | 
			
		||||
    strm->next_in = (uint8_t *)buf;
 | 
			
		||||
    strm->avail_in = buf_size;
 | 
			
		||||
    strm->next_out = out_buf;
 | 
			
		||||
    strm->avail_out = out_buf_size;
 | 
			
		||||
 | 
			
		||||
    ret = inflateInit2(strm, -12);
 | 
			
		||||
    if (ret != Z_OK)
 | 
			
		||||
        return -1;
 | 
			
		||||
    ret = inflate(strm, Z_FINISH);
 | 
			
		||||
    out_len = strm->next_out - out_buf;
 | 
			
		||||
    if ((ret != Z_STREAM_END && ret != Z_BUF_ERROR) ||
 | 
			
		||||
        out_len != out_buf_size) {
 | 
			
		||||
        inflateEnd(strm);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    inflateEnd(strm);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int decompress_cluster(BDRVQcowState *s, uint64_t cluster_offset)
 | 
			
		||||
{
 | 
			
		||||
    int ret, csize;
 | 
			
		||||
    uint64_t coffset;
 | 
			
		||||
 | 
			
		||||
    coffset = cluster_offset & s->cluster_offset_mask;
 | 
			
		||||
    if (s->cluster_cache_offset != coffset) {
 | 
			
		||||
        csize = cluster_offset >> (63 - s->cluster_bits);
 | 
			
		||||
        csize &= (s->cluster_size - 1);
 | 
			
		||||
        ret = bdrv_pread(s->hd, coffset, s->cluster_data, csize);
 | 
			
		||||
        if (ret != csize)
 | 
			
		||||
            return -1;
 | 
			
		||||
        if (decompress_buffer(s->cluster_cache, s->cluster_size,
 | 
			
		||||
                              s->cluster_data, csize) < 0) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        s->cluster_cache_offset = coffset;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#if 0
 | 
			
		||||
 | 
			
		||||
static int qcow_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                     uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int ret, index_in_cluster, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, sector_num << 9, 0, 0, 0, 0);
 | 
			
		||||
        index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
        n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
        if (n > nb_sectors)
 | 
			
		||||
            n = nb_sectors;
 | 
			
		||||
        if (!cluster_offset) {
 | 
			
		||||
            if (bs->backing_hd) {
 | 
			
		||||
                /* read from the base image */
 | 
			
		||||
                ret = bdrv_read(bs->backing_hd, sector_num, buf, n);
 | 
			
		||||
                if (ret < 0)
 | 
			
		||||
                    return -1;
 | 
			
		||||
            } else {
 | 
			
		||||
                memset(buf, 0, 512 * n);
 | 
			
		||||
            }
 | 
			
		||||
        } else if (cluster_offset & QCOW_OFLAG_COMPRESSED) {
 | 
			
		||||
            if (decompress_cluster(s, cluster_offset) < 0)
 | 
			
		||||
                return -1;
 | 
			
		||||
            memcpy(buf, s->cluster_cache + index_in_cluster * 512, 512 * n);
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = bdrv_pread(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512);
 | 
			
		||||
            if (ret != n * 512)
 | 
			
		||||
                return -1;
 | 
			
		||||
            if (s->crypt_method) {
 | 
			
		||||
                encrypt_sectors(s, sector_num, buf, buf, n, 0,
 | 
			
		||||
                                &s->aes_decrypt_key);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static int qcow_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                     const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int ret, index_in_cluster, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
        n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
        if (n > nb_sectors)
 | 
			
		||||
            n = nb_sectors;
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, sector_num << 9, 1, 0,
 | 
			
		||||
                                            index_in_cluster,
 | 
			
		||||
                                            index_in_cluster + n);
 | 
			
		||||
        if (!cluster_offset)
 | 
			
		||||
            return -1;
 | 
			
		||||
        if (s->crypt_method) {
 | 
			
		||||
            encrypt_sectors(s, sector_num, s->cluster_data, buf, n, 1,
 | 
			
		||||
                            &s->aes_encrypt_key);
 | 
			
		||||
            ret = bdrv_pwrite(s->hd, cluster_offset + index_in_cluster * 512,
 | 
			
		||||
                              s->cluster_data, n * 512);
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = bdrv_pwrite(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512);
 | 
			
		||||
        }
 | 
			
		||||
        if (ret != n * 512)
 | 
			
		||||
            return -1;
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
    s->cluster_cache_offset = -1; /* disable compressed cache */
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
typedef struct QCowAIOCB {
 | 
			
		||||
    BlockDriverAIOCB common;
 | 
			
		||||
    int64_t sector_num;
 | 
			
		||||
    uint8_t *buf;
 | 
			
		||||
    int nb_sectors;
 | 
			
		||||
    int n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
    uint8_t *cluster_data;
 | 
			
		||||
    BlockDriverAIOCB *hd_aiocb;
 | 
			
		||||
} QCowAIOCB;
 | 
			
		||||
 | 
			
		||||
static void qcow_aio_read_cb(void *opaque, int ret)
 | 
			
		||||
{
 | 
			
		||||
    QCowAIOCB *acb = opaque;
 | 
			
		||||
    BlockDriverState *bs = acb->common.bs;
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster;
 | 
			
		||||
 | 
			
		||||
    acb->hd_aiocb = NULL;
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
    fail:
 | 
			
		||||
        acb->common.cb(acb->common.opaque, ret);
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 redo:
 | 
			
		||||
    /* post process the read buffer */
 | 
			
		||||
    if (!acb->cluster_offset) {
 | 
			
		||||
        /* nothing to do */
 | 
			
		||||
    } else if (acb->cluster_offset & QCOW_OFLAG_COMPRESSED) {
 | 
			
		||||
        /* nothing to do */
 | 
			
		||||
    } else {
 | 
			
		||||
        if (s->crypt_method) {
 | 
			
		||||
            encrypt_sectors(s, acb->sector_num, acb->buf, acb->buf,
 | 
			
		||||
                            acb->n, 0,
 | 
			
		||||
                            &s->aes_decrypt_key);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    acb->nb_sectors -= acb->n;
 | 
			
		||||
    acb->sector_num += acb->n;
 | 
			
		||||
    acb->buf += acb->n * 512;
 | 
			
		||||
 | 
			
		||||
    if (acb->nb_sectors == 0) {
 | 
			
		||||
        /* request completed */
 | 
			
		||||
        acb->common.cb(acb->common.opaque, 0);
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* prepare next AIO request */
 | 
			
		||||
    acb->cluster_offset = get_cluster_offset(bs, acb->sector_num << 9,
 | 
			
		||||
                                             0, 0, 0, 0);
 | 
			
		||||
    index_in_cluster = acb->sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
    acb->n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
    if (acb->n > acb->nb_sectors)
 | 
			
		||||
        acb->n = acb->nb_sectors;
 | 
			
		||||
 | 
			
		||||
    if (!acb->cluster_offset) {
 | 
			
		||||
        if (bs->backing_hd) {
 | 
			
		||||
            /* read from the base image */
 | 
			
		||||
            acb->hd_aiocb = bdrv_aio_read(bs->backing_hd,
 | 
			
		||||
                acb->sector_num, acb->buf, acb->n, qcow_aio_read_cb, acb);
 | 
			
		||||
            if (acb->hd_aiocb == NULL)
 | 
			
		||||
                goto fail;
 | 
			
		||||
        } else {
 | 
			
		||||
            /* Note: in this case, no need to wait */
 | 
			
		||||
            memset(acb->buf, 0, 512 * acb->n);
 | 
			
		||||
            goto redo;
 | 
			
		||||
        }
 | 
			
		||||
    } else if (acb->cluster_offset & QCOW_OFLAG_COMPRESSED) {
 | 
			
		||||
        /* add AIO support for compressed blocks ? */
 | 
			
		||||
        if (decompress_cluster(s, acb->cluster_offset) < 0)
 | 
			
		||||
            goto fail;
 | 
			
		||||
        memcpy(acb->buf,
 | 
			
		||||
               s->cluster_cache + index_in_cluster * 512, 512 * acb->n);
 | 
			
		||||
        goto redo;
 | 
			
		||||
    } else {
 | 
			
		||||
        if ((acb->cluster_offset & 511) != 0) {
 | 
			
		||||
            ret = -EIO;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        acb->hd_aiocb = bdrv_aio_read(s->hd,
 | 
			
		||||
                            (acb->cluster_offset >> 9) + index_in_cluster,
 | 
			
		||||
                            acb->buf, acb->n, qcow_aio_read_cb, acb);
 | 
			
		||||
        if (acb->hd_aiocb == NULL)
 | 
			
		||||
            goto fail;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *qcow_aio_read(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, uint8_t *buf, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    QCowAIOCB *acb;
 | 
			
		||||
 | 
			
		||||
    acb = qemu_aio_get(bs, cb, opaque);
 | 
			
		||||
    if (!acb)
 | 
			
		||||
        return NULL;
 | 
			
		||||
    acb->hd_aiocb = NULL;
 | 
			
		||||
    acb->sector_num = sector_num;
 | 
			
		||||
    acb->buf = buf;
 | 
			
		||||
    acb->nb_sectors = nb_sectors;
 | 
			
		||||
    acb->n = 0;
 | 
			
		||||
    acb->cluster_offset = 0;
 | 
			
		||||
 | 
			
		||||
    qcow_aio_read_cb(acb, 0);
 | 
			
		||||
    return &acb->common;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qcow_aio_write_cb(void *opaque, int ret)
 | 
			
		||||
{
 | 
			
		||||
    QCowAIOCB *acb = opaque;
 | 
			
		||||
    BlockDriverState *bs = acb->common.bs;
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
    const uint8_t *src_buf;
 | 
			
		||||
 | 
			
		||||
    acb->hd_aiocb = NULL;
 | 
			
		||||
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
    fail:
 | 
			
		||||
        acb->common.cb(acb->common.opaque, ret);
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    acb->nb_sectors -= acb->n;
 | 
			
		||||
    acb->sector_num += acb->n;
 | 
			
		||||
    acb->buf += acb->n * 512;
 | 
			
		||||
 | 
			
		||||
    if (acb->nb_sectors == 0) {
 | 
			
		||||
        /* request completed */
 | 
			
		||||
        acb->common.cb(acb->common.opaque, 0);
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    index_in_cluster = acb->sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
    acb->n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
    if (acb->n > acb->nb_sectors)
 | 
			
		||||
        acb->n = acb->nb_sectors;
 | 
			
		||||
    cluster_offset = get_cluster_offset(bs, acb->sector_num << 9, 1, 0,
 | 
			
		||||
                                        index_in_cluster,
 | 
			
		||||
                                        index_in_cluster + acb->n);
 | 
			
		||||
    if (!cluster_offset || (cluster_offset & 511) != 0) {
 | 
			
		||||
        ret = -EIO;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    if (s->crypt_method) {
 | 
			
		||||
        if (!acb->cluster_data) {
 | 
			
		||||
            acb->cluster_data = qemu_mallocz(s->cluster_size);
 | 
			
		||||
            if (!acb->cluster_data) {
 | 
			
		||||
                ret = -ENOMEM;
 | 
			
		||||
                goto fail;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        encrypt_sectors(s, acb->sector_num, acb->cluster_data, acb->buf,
 | 
			
		||||
                        acb->n, 1, &s->aes_encrypt_key);
 | 
			
		||||
        src_buf = acb->cluster_data;
 | 
			
		||||
    } else {
 | 
			
		||||
        src_buf = acb->buf;
 | 
			
		||||
    }
 | 
			
		||||
    acb->hd_aiocb = bdrv_aio_write(s->hd,
 | 
			
		||||
                                   (cluster_offset >> 9) + index_in_cluster,
 | 
			
		||||
                                   src_buf, acb->n,
 | 
			
		||||
                                   qcow_aio_write_cb, acb);
 | 
			
		||||
    if (acb->hd_aiocb == NULL)
 | 
			
		||||
        goto fail;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *qcow_aio_write(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, const uint8_t *buf, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    QCowAIOCB *acb;
 | 
			
		||||
 | 
			
		||||
    s->cluster_cache_offset = -1; /* disable compressed cache */
 | 
			
		||||
 | 
			
		||||
    acb = qemu_aio_get(bs, cb, opaque);
 | 
			
		||||
    if (!acb)
 | 
			
		||||
        return NULL;
 | 
			
		||||
    acb->hd_aiocb = NULL;
 | 
			
		||||
    acb->sector_num = sector_num;
 | 
			
		||||
    acb->buf = (uint8_t *)buf;
 | 
			
		||||
    acb->nb_sectors = nb_sectors;
 | 
			
		||||
    acb->n = 0;
 | 
			
		||||
 | 
			
		||||
    qcow_aio_write_cb(acb, 0);
 | 
			
		||||
    return &acb->common;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qcow_aio_cancel(BlockDriverAIOCB *blockacb)
 | 
			
		||||
{
 | 
			
		||||
    QCowAIOCB *acb = (QCowAIOCB *)blockacb;
 | 
			
		||||
    if (acb->hd_aiocb)
 | 
			
		||||
        bdrv_aio_cancel(acb->hd_aiocb);
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qcow_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    qemu_free(s->l1_table);
 | 
			
		||||
    qemu_free(s->l2_cache);
 | 
			
		||||
    qemu_free(s->cluster_cache);
 | 
			
		||||
    qemu_free(s->cluster_data);
 | 
			
		||||
    bdrv_delete(s->hd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_create(const char *filename, int64_t total_size,
 | 
			
		||||
                      const char *backing_file, int flags)
 | 
			
		||||
{
 | 
			
		||||
    int fd, header_size, backing_filename_len, l1_size, i, shift;
 | 
			
		||||
    QCowHeader header;
 | 
			
		||||
    uint64_t tmp;
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, 0644);
 | 
			
		||||
    if (fd < 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    memset(&header, 0, sizeof(header));
 | 
			
		||||
    header.magic = cpu_to_be32(QCOW_MAGIC);
 | 
			
		||||
    header.version = cpu_to_be32(QCOW_VERSION);
 | 
			
		||||
    header.size = cpu_to_be64(total_size * 512);
 | 
			
		||||
    header_size = sizeof(header);
 | 
			
		||||
    backing_filename_len = 0;
 | 
			
		||||
    if (backing_file) {
 | 
			
		||||
        if (strcmp(backing_file, "fat:")) {
 | 
			
		||||
            header.backing_file_offset = cpu_to_be64(header_size);
 | 
			
		||||
            backing_filename_len = strlen(backing_file);
 | 
			
		||||
            header.backing_file_size = cpu_to_be32(backing_filename_len);
 | 
			
		||||
            header_size += backing_filename_len;
 | 
			
		||||
        } else {
 | 
			
		||||
            /* special backing file for vvfat */
 | 
			
		||||
            backing_file = NULL;
 | 
			
		||||
        }
 | 
			
		||||
        header.cluster_bits = 9; /* 512 byte cluster to avoid copying
 | 
			
		||||
                                    unmodifyed sectors */
 | 
			
		||||
        header.l2_bits = 12; /* 32 KB L2 tables */
 | 
			
		||||
    } else {
 | 
			
		||||
        header.cluster_bits = 12; /* 4 KB clusters */
 | 
			
		||||
        header.l2_bits = 9; /* 4 KB L2 tables */
 | 
			
		||||
    }
 | 
			
		||||
    header_size = (header_size + 7) & ~7;
 | 
			
		||||
    shift = header.cluster_bits + header.l2_bits;
 | 
			
		||||
    l1_size = ((total_size * 512) + (1LL << shift) - 1) >> shift;
 | 
			
		||||
 | 
			
		||||
    header.l1_table_offset = cpu_to_be64(header_size);
 | 
			
		||||
    if (flags & BLOCK_FLAG_ENCRYPT) {
 | 
			
		||||
        header.crypt_method = cpu_to_be32(QCOW_CRYPT_AES);
 | 
			
		||||
    } else {
 | 
			
		||||
        header.crypt_method = cpu_to_be32(QCOW_CRYPT_NONE);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* write all the data */
 | 
			
		||||
    write(fd, &header, sizeof(header));
 | 
			
		||||
    if (backing_file) {
 | 
			
		||||
        write(fd, backing_file, backing_filename_len);
 | 
			
		||||
    }
 | 
			
		||||
    lseek(fd, header_size, SEEK_SET);
 | 
			
		||||
    tmp = 0;
 | 
			
		||||
    for(i = 0;i < l1_size; i++) {
 | 
			
		||||
        write(fd, &tmp, sizeof(tmp));
 | 
			
		||||
    }
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_make_empty(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    uint32_t l1_length = s->l1_size * sizeof(uint64_t);
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    memset(s->l1_table, 0, l1_length);
 | 
			
		||||
    if (bdrv_pwrite(s->hd, s->l1_table_offset, s->l1_table, l1_length) < 0)
 | 
			
		||||
	return -1;
 | 
			
		||||
    ret = bdrv_truncate(s->hd, s->l1_table_offset + l1_length);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        return ret;
 | 
			
		||||
 | 
			
		||||
    memset(s->l2_cache, 0, s->l2_size * L2_CACHE_SIZE * sizeof(uint64_t));
 | 
			
		||||
    memset(s->l2_cache_offsets, 0, L2_CACHE_SIZE * sizeof(uint64_t));
 | 
			
		||||
    memset(s->l2_cache_counts, 0, L2_CACHE_SIZE * sizeof(uint32_t));
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* XXX: put compressed sectors first, then all the cluster aligned
 | 
			
		||||
   tables to avoid losing bytes in alignment */
 | 
			
		||||
static int qcow_write_compressed(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                 const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    z_stream strm;
 | 
			
		||||
    int ret, out_len;
 | 
			
		||||
    uint8_t *out_buf;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    if (nb_sectors != s->cluster_sectors)
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
 | 
			
		||||
    out_buf = qemu_malloc(s->cluster_size + (s->cluster_size / 1000) + 128);
 | 
			
		||||
    if (!out_buf)
 | 
			
		||||
        return -1;
 | 
			
		||||
 | 
			
		||||
    /* best compression, small window, no zlib header */
 | 
			
		||||
    memset(&strm, 0, sizeof(strm));
 | 
			
		||||
    ret = deflateInit2(&strm, Z_DEFAULT_COMPRESSION,
 | 
			
		||||
                       Z_DEFLATED, -12,
 | 
			
		||||
                       9, Z_DEFAULT_STRATEGY);
 | 
			
		||||
    if (ret != 0) {
 | 
			
		||||
        qemu_free(out_buf);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    strm.avail_in = s->cluster_size;
 | 
			
		||||
    strm.next_in = (uint8_t *)buf;
 | 
			
		||||
    strm.avail_out = s->cluster_size;
 | 
			
		||||
    strm.next_out = out_buf;
 | 
			
		||||
 | 
			
		||||
    ret = deflate(&strm, Z_FINISH);
 | 
			
		||||
    if (ret != Z_STREAM_END && ret != Z_OK) {
 | 
			
		||||
        qemu_free(out_buf);
 | 
			
		||||
        deflateEnd(&strm);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    out_len = strm.next_out - out_buf;
 | 
			
		||||
 | 
			
		||||
    deflateEnd(&strm);
 | 
			
		||||
 | 
			
		||||
    if (ret != Z_STREAM_END || out_len >= s->cluster_size) {
 | 
			
		||||
        /* could not compress: write normal cluster */
 | 
			
		||||
        qcow_write(bs, sector_num, buf, s->cluster_sectors);
 | 
			
		||||
    } else {
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, sector_num << 9, 2,
 | 
			
		||||
                                            out_len, 0, 0);
 | 
			
		||||
        cluster_offset &= s->cluster_offset_mask;
 | 
			
		||||
        if (bdrv_pwrite(s->hd, cluster_offset, out_buf, out_len) != out_len) {
 | 
			
		||||
            qemu_free(out_buf);
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_free(out_buf);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qcow_flush(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    bdrv_flush(s->hd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_get_info(BlockDriverState *bs, BlockDriverInfo *bdi)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    bdi->cluster_size = s->cluster_size;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_qcow = {
 | 
			
		||||
    "qcow",
 | 
			
		||||
    sizeof(BDRVQcowState),
 | 
			
		||||
    qcow_probe,
 | 
			
		||||
    qcow_open,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    qcow_close,
 | 
			
		||||
    qcow_create,
 | 
			
		||||
    qcow_flush,
 | 
			
		||||
    qcow_is_allocated,
 | 
			
		||||
    qcow_set_key,
 | 
			
		||||
    qcow_make_empty,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_read = qcow_aio_read,
 | 
			
		||||
    .bdrv_aio_write = qcow_aio_write,
 | 
			
		||||
    .bdrv_aio_cancel = qcow_aio_cancel,
 | 
			
		||||
    .aiocb_size = sizeof(QCowAIOCB),
 | 
			
		||||
    .bdrv_write_compressed = qcow_write_compressed,
 | 
			
		||||
    .bdrv_get_info = qcow_get_info,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										2618
									
								
								block-qcow2.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										2618
									
								
								block-qcow2.c
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										1197
									
								
								block-raw-posix.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										1197
									
								
								block-raw-posix.c
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										517
									
								
								block-raw-win32.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										517
									
								
								block-raw-win32.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,517 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for RAW files (win32)
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2006 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "qemu-timer.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
#include <assert.h>
 | 
			
		||||
#include <winioctl.h>
 | 
			
		||||
 | 
			
		||||
//#define WIN32_AIO
 | 
			
		||||
 | 
			
		||||
#define FTYPE_FILE 0
 | 
			
		||||
#define FTYPE_CD     1
 | 
			
		||||
#define FTYPE_HARDDISK 2
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVRawState {
 | 
			
		||||
    HANDLE hfile;
 | 
			
		||||
    int type;
 | 
			
		||||
    char drive_path[16]; /* format: "d:\" */
 | 
			
		||||
} BDRVRawState;
 | 
			
		||||
 | 
			
		||||
typedef struct RawAIOCB {
 | 
			
		||||
    BlockDriverAIOCB common;
 | 
			
		||||
    HANDLE hEvent;
 | 
			
		||||
    OVERLAPPED ov;
 | 
			
		||||
    int count;
 | 
			
		||||
} RawAIOCB;
 | 
			
		||||
 | 
			
		||||
int qemu_ftruncate64(int fd, int64_t length)
 | 
			
		||||
{
 | 
			
		||||
    LARGE_INTEGER li;
 | 
			
		||||
    LONG high;
 | 
			
		||||
    HANDLE h;
 | 
			
		||||
    BOOL res;
 | 
			
		||||
 | 
			
		||||
    if ((GetVersion() & 0x80000000UL) && (length >> 32) != 0)
 | 
			
		||||
	return -1;
 | 
			
		||||
 | 
			
		||||
    h = (HANDLE)_get_osfhandle(fd);
 | 
			
		||||
 | 
			
		||||
    /* get current position, ftruncate do not change position */
 | 
			
		||||
    li.HighPart = 0;
 | 
			
		||||
    li.LowPart = SetFilePointer (h, 0, &li.HighPart, FILE_CURRENT);
 | 
			
		||||
    if (li.LowPart == 0xffffffffUL && GetLastError() != NO_ERROR)
 | 
			
		||||
	return -1;
 | 
			
		||||
 | 
			
		||||
    high = length >> 32;
 | 
			
		||||
    if (!SetFilePointer(h, (DWORD) length, &high, FILE_BEGIN))
 | 
			
		||||
	return -1;
 | 
			
		||||
    res = SetEndOfFile(h);
 | 
			
		||||
 | 
			
		||||
    /* back to old position */
 | 
			
		||||
    SetFilePointer(h, li.LowPart, &li.HighPart, FILE_BEGIN);
 | 
			
		||||
    return res ? 0 : -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int set_sparse(int fd)
 | 
			
		||||
{
 | 
			
		||||
    DWORD returned;
 | 
			
		||||
    return (int) DeviceIoControl((HANDLE)_get_osfhandle(fd), FSCTL_SET_SPARSE,
 | 
			
		||||
				 NULL, 0, NULL, 0, &returned, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    int access_flags, create_flags;
 | 
			
		||||
    DWORD overlapped;
 | 
			
		||||
 | 
			
		||||
    s->type = FTYPE_FILE;
 | 
			
		||||
 | 
			
		||||
    if ((flags & BDRV_O_ACCESS) == O_RDWR) {
 | 
			
		||||
        access_flags = GENERIC_READ | GENERIC_WRITE;
 | 
			
		||||
    } else {
 | 
			
		||||
        access_flags = GENERIC_READ;
 | 
			
		||||
    }
 | 
			
		||||
    if (flags & BDRV_O_CREAT) {
 | 
			
		||||
        create_flags = CREATE_ALWAYS;
 | 
			
		||||
    } else {
 | 
			
		||||
        create_flags = OPEN_EXISTING;
 | 
			
		||||
    }
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
    overlapped = FILE_FLAG_OVERLAPPED;
 | 
			
		||||
#else
 | 
			
		||||
    overlapped = FILE_ATTRIBUTE_NORMAL;
 | 
			
		||||
#endif
 | 
			
		||||
    if ((flags & BDRV_O_NOCACHE))
 | 
			
		||||
        overlapped |= FILE_FLAG_NO_BUFFERING | FILE_FLAG_WRITE_THROUGH;
 | 
			
		||||
    else if (!(flags & BDRV_O_CACHE_WB))
 | 
			
		||||
        overlapped |= FILE_FLAG_WRITE_THROUGH;
 | 
			
		||||
    s->hfile = CreateFile(filename, access_flags,
 | 
			
		||||
                          FILE_SHARE_READ, NULL,
 | 
			
		||||
                          create_flags, overlapped, NULL);
 | 
			
		||||
    if (s->hfile == INVALID_HANDLE_VALUE) {
 | 
			
		||||
        int err = GetLastError();
 | 
			
		||||
 | 
			
		||||
        if (err == ERROR_ACCESS_DENIED)
 | 
			
		||||
            return -EACCES;
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_pread(BlockDriverState *bs, int64_t offset,
 | 
			
		||||
                     uint8_t *buf, int count)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    OVERLAPPED ov;
 | 
			
		||||
    DWORD ret_count;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    memset(&ov, 0, sizeof(ov));
 | 
			
		||||
    ov.Offset = offset;
 | 
			
		||||
    ov.OffsetHigh = offset >> 32;
 | 
			
		||||
    ret = ReadFile(s->hfile, buf, count, &ret_count, &ov);
 | 
			
		||||
    if (!ret) {
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
        ret = GetOverlappedResult(s->hfile, &ov, &ret_count, TRUE);
 | 
			
		||||
        if (!ret)
 | 
			
		||||
            return -EIO;
 | 
			
		||||
        else
 | 
			
		||||
#endif
 | 
			
		||||
            return ret_count;
 | 
			
		||||
    }
 | 
			
		||||
    return ret_count;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_pwrite(BlockDriverState *bs, int64_t offset,
 | 
			
		||||
                      const uint8_t *buf, int count)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    OVERLAPPED ov;
 | 
			
		||||
    DWORD ret_count;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    memset(&ov, 0, sizeof(ov));
 | 
			
		||||
    ov.Offset = offset;
 | 
			
		||||
    ov.OffsetHigh = offset >> 32;
 | 
			
		||||
    ret = WriteFile(s->hfile, buf, count, &ret_count, &ov);
 | 
			
		||||
    if (!ret) {
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
        ret = GetOverlappedResult(s->hfile, &ov, &ret_count, TRUE);
 | 
			
		||||
        if (!ret)
 | 
			
		||||
            return -EIO;
 | 
			
		||||
        else
 | 
			
		||||
#endif
 | 
			
		||||
            return ret_count;
 | 
			
		||||
    }
 | 
			
		||||
    return ret_count;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
static void raw_aio_cb(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RawAIOCB *acb = opaque;
 | 
			
		||||
    BlockDriverState *bs = acb->common.bs;
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    DWORD ret_count;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = GetOverlappedResult(s->hfile, &acb->ov, &ret_count, TRUE);
 | 
			
		||||
    if (!ret || ret_count != acb->count) {
 | 
			
		||||
        acb->common.cb(acb->common.opaque, -EIO);
 | 
			
		||||
    } else {
 | 
			
		||||
        acb->common.cb(acb->common.opaque, 0);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static RawAIOCB *raw_aio_setup(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, uint8_t *buf, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    RawAIOCB *acb;
 | 
			
		||||
    int64_t offset;
 | 
			
		||||
 | 
			
		||||
    acb = qemu_aio_get(bs, cb, opaque);
 | 
			
		||||
    if (acb->hEvent) {
 | 
			
		||||
        acb->hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
 | 
			
		||||
        if (!acb->hEvent) {
 | 
			
		||||
            qemu_aio_release(acb);
 | 
			
		||||
            return NULL;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    memset(&acb->ov, 0, sizeof(acb->ov));
 | 
			
		||||
    offset = sector_num * 512;
 | 
			
		||||
    acb->ov.Offset = offset;
 | 
			
		||||
    acb->ov.OffsetHigh = offset >> 32;
 | 
			
		||||
    acb->ov.hEvent = acb->hEvent;
 | 
			
		||||
    acb->count = nb_sectors * 512;
 | 
			
		||||
    qemu_add_wait_object(acb->ov.hEvent, raw_aio_cb, acb);
 | 
			
		||||
    return acb;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *raw_aio_read(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, uint8_t *buf, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    RawAIOCB *acb;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    acb = raw_aio_setup(bs, sector_num, buf, nb_sectors, cb, opaque);
 | 
			
		||||
    if (!acb)
 | 
			
		||||
        return NULL;
 | 
			
		||||
    ret = ReadFile(s->hfile, buf, acb->count, NULL, &acb->ov);
 | 
			
		||||
    if (!ret) {
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
    return (BlockDriverAIOCB *)acb;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *raw_aio_write(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, uint8_t *buf, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    RawAIOCB *acb;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    acb = raw_aio_setup(bs, sector_num, buf, nb_sectors, cb, opaque);
 | 
			
		||||
    if (!acb)
 | 
			
		||||
        return NULL;
 | 
			
		||||
    ret = WriteFile(s->hfile, buf, acb->count, NULL, &acb->ov);
 | 
			
		||||
    if (!ret) {
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
    return (BlockDriverAIOCB *)acb;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void raw_aio_cancel(BlockDriverAIOCB *blockacb)
 | 
			
		||||
{
 | 
			
		||||
    RawAIOCB *acb = (RawAIOCB *)blockacb;
 | 
			
		||||
    BlockDriverState *bs = acb->common.bs;
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_del_wait_object(acb->ov.hEvent, raw_aio_cb, acb);
 | 
			
		||||
    /* XXX: if more than one async I/O it is not correct */
 | 
			
		||||
    CancelIo(s->hfile);
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
}
 | 
			
		||||
#endif /* #if WIN32_AIO */
 | 
			
		||||
 | 
			
		||||
static void raw_flush(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    FlushFileBuffers(s->hfile);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void raw_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    CloseHandle(s->hfile);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_truncate(BlockDriverState *bs, int64_t offset)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    DWORD low, high;
 | 
			
		||||
 | 
			
		||||
    low = offset;
 | 
			
		||||
    high = offset >> 32;
 | 
			
		||||
    if (!SetFilePointer(s->hfile, low, &high, FILE_BEGIN))
 | 
			
		||||
	return -EIO;
 | 
			
		||||
    if (!SetEndOfFile(s->hfile))
 | 
			
		||||
        return -EIO;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t raw_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    LARGE_INTEGER l;
 | 
			
		||||
    ULARGE_INTEGER available, total, total_free;
 | 
			
		||||
    DISK_GEOMETRY_EX dg;
 | 
			
		||||
    DWORD count;
 | 
			
		||||
    BOOL status;
 | 
			
		||||
 | 
			
		||||
    switch(s->type) {
 | 
			
		||||
    case FTYPE_FILE:
 | 
			
		||||
        l.LowPart = GetFileSize(s->hfile, &l.HighPart);
 | 
			
		||||
        if (l.LowPart == 0xffffffffUL && GetLastError() != NO_ERROR)
 | 
			
		||||
            return -EIO;
 | 
			
		||||
        break;
 | 
			
		||||
    case FTYPE_CD:
 | 
			
		||||
        if (!GetDiskFreeSpaceEx(s->drive_path, &available, &total, &total_free))
 | 
			
		||||
            return -EIO;
 | 
			
		||||
        l.QuadPart = total.QuadPart;
 | 
			
		||||
        break;
 | 
			
		||||
    case FTYPE_HARDDISK:
 | 
			
		||||
        status = DeviceIoControl(s->hfile, IOCTL_DISK_GET_DRIVE_GEOMETRY_EX,
 | 
			
		||||
                                 NULL, 0, &dg, sizeof(dg), &count, NULL);
 | 
			
		||||
        if (status != 0) {
 | 
			
		||||
            l = dg.DiskSize;
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
    default:
 | 
			
		||||
        return -EIO;
 | 
			
		||||
    }
 | 
			
		||||
    return l.QuadPart;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_create(const char *filename, int64_t total_size,
 | 
			
		||||
                      const char *backing_file, int flags)
 | 
			
		||||
{
 | 
			
		||||
    int fd;
 | 
			
		||||
 | 
			
		||||
    if (flags || backing_file)
 | 
			
		||||
        return -ENOTSUP;
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY,
 | 
			
		||||
              0644);
 | 
			
		||||
    if (fd < 0)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
    set_sparse(fd);
 | 
			
		||||
    ftruncate(fd, total_size * 512);
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_raw = {
 | 
			
		||||
    "raw",
 | 
			
		||||
    sizeof(BDRVRawState),
 | 
			
		||||
    NULL, /* no probe for protocols */
 | 
			
		||||
    raw_open,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    raw_close,
 | 
			
		||||
    raw_create,
 | 
			
		||||
    raw_flush,
 | 
			
		||||
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
    .bdrv_aio_read = raw_aio_read,
 | 
			
		||||
    .bdrv_aio_write = raw_aio_write,
 | 
			
		||||
    .bdrv_aio_cancel = raw_aio_cancel,
 | 
			
		||||
    .aiocb_size = sizeof(RawAIOCB);
 | 
			
		||||
#endif
 | 
			
		||||
    .bdrv_pread = raw_pread,
 | 
			
		||||
    .bdrv_pwrite = raw_pwrite,
 | 
			
		||||
    .bdrv_truncate = raw_truncate,
 | 
			
		||||
    .bdrv_getlength = raw_getlength,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
/***********************************************/
 | 
			
		||||
/* host device */
 | 
			
		||||
 | 
			
		||||
static int find_cdrom(char *cdrom_name, int cdrom_name_size)
 | 
			
		||||
{
 | 
			
		||||
    char drives[256], *pdrv = drives;
 | 
			
		||||
    UINT type;
 | 
			
		||||
 | 
			
		||||
    memset(drives, 0, sizeof(drives));
 | 
			
		||||
    GetLogicalDriveStrings(sizeof(drives), drives);
 | 
			
		||||
    while(pdrv[0] != '\0') {
 | 
			
		||||
        type = GetDriveType(pdrv);
 | 
			
		||||
        switch(type) {
 | 
			
		||||
        case DRIVE_CDROM:
 | 
			
		||||
            snprintf(cdrom_name, cdrom_name_size, "\\\\.\\%c:", pdrv[0]);
 | 
			
		||||
            return 0;
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        pdrv += lstrlen(pdrv) + 1;
 | 
			
		||||
    }
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int find_device_type(BlockDriverState *bs, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    UINT type;
 | 
			
		||||
    const char *p;
 | 
			
		||||
 | 
			
		||||
    if (strstart(filename, "\\\\.\\", &p) ||
 | 
			
		||||
        strstart(filename, "//./", &p)) {
 | 
			
		||||
        if (stristart(p, "PhysicalDrive", NULL))
 | 
			
		||||
            return FTYPE_HARDDISK;
 | 
			
		||||
        snprintf(s->drive_path, sizeof(s->drive_path), "%c:\\", p[0]);
 | 
			
		||||
        type = GetDriveType(s->drive_path);
 | 
			
		||||
        if (type == DRIVE_CDROM)
 | 
			
		||||
            return FTYPE_CD;
 | 
			
		||||
        else
 | 
			
		||||
            return FTYPE_FILE;
 | 
			
		||||
    } else {
 | 
			
		||||
        return FTYPE_FILE;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int hdev_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVRawState *s = bs->opaque;
 | 
			
		||||
    int access_flags, create_flags;
 | 
			
		||||
    DWORD overlapped;
 | 
			
		||||
    char device_name[64];
 | 
			
		||||
 | 
			
		||||
    if (strstart(filename, "/dev/cdrom", NULL)) {
 | 
			
		||||
        if (find_cdrom(device_name, sizeof(device_name)) < 0)
 | 
			
		||||
            return -ENOENT;
 | 
			
		||||
        filename = device_name;
 | 
			
		||||
    } else {
 | 
			
		||||
        /* transform drive letters into device name */
 | 
			
		||||
        if (((filename[0] >= 'a' && filename[0] <= 'z') ||
 | 
			
		||||
             (filename[0] >= 'A' && filename[0] <= 'Z')) &&
 | 
			
		||||
            filename[1] == ':' && filename[2] == '\0') {
 | 
			
		||||
            snprintf(device_name, sizeof(device_name), "\\\\.\\%c:", filename[0]);
 | 
			
		||||
            filename = device_name;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    s->type = find_device_type(bs, filename);
 | 
			
		||||
 | 
			
		||||
    if ((flags & BDRV_O_ACCESS) == O_RDWR) {
 | 
			
		||||
        access_flags = GENERIC_READ | GENERIC_WRITE;
 | 
			
		||||
    } else {
 | 
			
		||||
        access_flags = GENERIC_READ;
 | 
			
		||||
    }
 | 
			
		||||
    create_flags = OPEN_EXISTING;
 | 
			
		||||
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
    overlapped = FILE_FLAG_OVERLAPPED;
 | 
			
		||||
#else
 | 
			
		||||
    overlapped = FILE_ATTRIBUTE_NORMAL;
 | 
			
		||||
#endif
 | 
			
		||||
    if ((flags & BDRV_O_NOCACHE))
 | 
			
		||||
        overlapped |= FILE_FLAG_NO_BUFFERING | FILE_FLAG_WRITE_THROUGH;
 | 
			
		||||
    else if (!(flags & BDRV_O_CACHE_WB))
 | 
			
		||||
        overlapped |= FILE_FLAG_WRITE_THROUGH;
 | 
			
		||||
    s->hfile = CreateFile(filename, access_flags,
 | 
			
		||||
                          FILE_SHARE_READ, NULL,
 | 
			
		||||
                          create_flags, overlapped, NULL);
 | 
			
		||||
    if (s->hfile == INVALID_HANDLE_VALUE) {
 | 
			
		||||
        int err = GetLastError();
 | 
			
		||||
 | 
			
		||||
        if (err == ERROR_ACCESS_DENIED)
 | 
			
		||||
            return -EACCES;
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#if 0
 | 
			
		||||
/***********************************************/
 | 
			
		||||
/* removable device additional commands */
 | 
			
		||||
 | 
			
		||||
static int raw_is_inserted(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    return 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_media_changed(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    return -ENOTSUP;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_eject(BlockDriverState *bs, int eject_flag)
 | 
			
		||||
{
 | 
			
		||||
    DWORD ret_count;
 | 
			
		||||
 | 
			
		||||
    if (s->type == FTYPE_FILE)
 | 
			
		||||
        return -ENOTSUP;
 | 
			
		||||
    if (eject_flag) {
 | 
			
		||||
        DeviceIoControl(s->hfile, IOCTL_STORAGE_EJECT_MEDIA,
 | 
			
		||||
                        NULL, 0, NULL, 0, &lpBytesReturned, NULL);
 | 
			
		||||
    } else {
 | 
			
		||||
        DeviceIoControl(s->hfile, IOCTL_STORAGE_LOAD_MEDIA,
 | 
			
		||||
                        NULL, 0, NULL, 0, &lpBytesReturned, NULL);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int raw_set_locked(BlockDriverState *bs, int locked)
 | 
			
		||||
{
 | 
			
		||||
    return -ENOTSUP;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_host_device = {
 | 
			
		||||
    "host_device",
 | 
			
		||||
    sizeof(BDRVRawState),
 | 
			
		||||
    NULL, /* no probe for protocols */
 | 
			
		||||
    hdev_open,
 | 
			
		||||
    NULL,
 | 
			
		||||
    NULL,
 | 
			
		||||
    raw_close,
 | 
			
		||||
    NULL,
 | 
			
		||||
    raw_flush,
 | 
			
		||||
 | 
			
		||||
#ifdef WIN32_AIO
 | 
			
		||||
    .bdrv_aio_read = raw_aio_read,
 | 
			
		||||
    .bdrv_aio_write = raw_aio_write,
 | 
			
		||||
    .bdrv_aio_cancel = raw_aio_cancel,
 | 
			
		||||
    .aiocb_size = sizeof(RawAIOCB);
 | 
			
		||||
#endif
 | 
			
		||||
    .bdrv_pread = raw_pread,
 | 
			
		||||
    .bdrv_pwrite = raw_pwrite,
 | 
			
		||||
    .bdrv_getlength = raw_getlength,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										825
									
								
								block-vmdk.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										825
									
								
								block-vmdk.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,825 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the VMDK format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Fabrice Bellard
 | 
			
		||||
 * Copyright (c) 2005 Filip Navara
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
 | 
			
		||||
#define VMDK3_MAGIC (('C' << 24) | ('O' << 16) | ('W' << 8) | 'D')
 | 
			
		||||
#define VMDK4_MAGIC (('K' << 24) | ('D' << 16) | ('M' << 8) | 'V')
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t flags;
 | 
			
		||||
    uint32_t disk_sectors;
 | 
			
		||||
    uint32_t granularity;
 | 
			
		||||
    uint32_t l1dir_offset;
 | 
			
		||||
    uint32_t l1dir_size;
 | 
			
		||||
    uint32_t file_sectors;
 | 
			
		||||
    uint32_t cylinders;
 | 
			
		||||
    uint32_t heads;
 | 
			
		||||
    uint32_t sectors_per_track;
 | 
			
		||||
} VMDK3Header;
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t flags;
 | 
			
		||||
    int64_t capacity;
 | 
			
		||||
    int64_t granularity;
 | 
			
		||||
    int64_t desc_offset;
 | 
			
		||||
    int64_t desc_size;
 | 
			
		||||
    int32_t num_gtes_per_gte;
 | 
			
		||||
    int64_t rgd_offset;
 | 
			
		||||
    int64_t gd_offset;
 | 
			
		||||
    int64_t grain_offset;
 | 
			
		||||
    char filler[1];
 | 
			
		||||
    char check_bytes[4];
 | 
			
		||||
} __attribute__((packed)) VMDK4Header;
 | 
			
		||||
 | 
			
		||||
#define L2_CACHE_SIZE 16
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVVmdkState {
 | 
			
		||||
    BlockDriverState *hd;
 | 
			
		||||
    int64_t l1_table_offset;
 | 
			
		||||
    int64_t l1_backup_table_offset;
 | 
			
		||||
    uint32_t *l1_table;
 | 
			
		||||
    uint32_t *l1_backup_table;
 | 
			
		||||
    unsigned int l1_size;
 | 
			
		||||
    uint32_t l1_entry_sectors;
 | 
			
		||||
 | 
			
		||||
    unsigned int l2_size;
 | 
			
		||||
    uint32_t *l2_cache;
 | 
			
		||||
    uint32_t l2_cache_offsets[L2_CACHE_SIZE];
 | 
			
		||||
    uint32_t l2_cache_counts[L2_CACHE_SIZE];
 | 
			
		||||
 | 
			
		||||
    unsigned int cluster_sectors;
 | 
			
		||||
    uint32_t parent_cid;
 | 
			
		||||
    int is_parent;
 | 
			
		||||
} BDRVVmdkState;
 | 
			
		||||
 | 
			
		||||
typedef struct VmdkMetaData {
 | 
			
		||||
    uint32_t offset;
 | 
			
		||||
    unsigned int l1_index;
 | 
			
		||||
    unsigned int l2_index;
 | 
			
		||||
    unsigned int l2_offset;
 | 
			
		||||
    int valid;
 | 
			
		||||
} VmdkMetaData;
 | 
			
		||||
 | 
			
		||||
typedef struct ActiveBDRVState{
 | 
			
		||||
    BlockDriverState *hd;            // active image handler
 | 
			
		||||
    uint64_t cluster_offset;         // current write offset
 | 
			
		||||
}ActiveBDRVState;
 | 
			
		||||
 | 
			
		||||
static ActiveBDRVState activeBDRV;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static int vmdk_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    uint32_t magic;
 | 
			
		||||
 | 
			
		||||
    if (buf_size < 4)
 | 
			
		||||
        return 0;
 | 
			
		||||
    magic = be32_to_cpu(*(uint32_t *)buf);
 | 
			
		||||
    if (magic == VMDK3_MAGIC ||
 | 
			
		||||
        magic == VMDK4_MAGIC)
 | 
			
		||||
        return 100;
 | 
			
		||||
    else
 | 
			
		||||
        return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#define CHECK_CID 1
 | 
			
		||||
 | 
			
		||||
#define SECTOR_SIZE 512
 | 
			
		||||
#define DESC_SIZE 20*SECTOR_SIZE	// 20 sectors of 512 bytes each
 | 
			
		||||
#define HEADER_SIZE 512   			// first sector of 512 bytes
 | 
			
		||||
 | 
			
		||||
static uint32_t vmdk_read_cid(BlockDriverState *bs, int parent)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    char desc[DESC_SIZE];
 | 
			
		||||
    uint32_t cid;
 | 
			
		||||
    const char *p_name, *cid_str;
 | 
			
		||||
    size_t cid_str_size;
 | 
			
		||||
 | 
			
		||||
    /* the descriptor offset = 0x200 */
 | 
			
		||||
    if (bdrv_pread(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE)
 | 
			
		||||
        return 0;
 | 
			
		||||
 | 
			
		||||
    if (parent) {
 | 
			
		||||
        cid_str = "parentCID";
 | 
			
		||||
        cid_str_size = sizeof("parentCID");
 | 
			
		||||
    } else {
 | 
			
		||||
        cid_str = "CID";
 | 
			
		||||
        cid_str_size = sizeof("CID");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if ((p_name = strstr(desc,cid_str)) != 0) {
 | 
			
		||||
        p_name += cid_str_size;
 | 
			
		||||
        sscanf(p_name,"%x",&cid);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return cid;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_write_cid(BlockDriverState *bs, uint32_t cid)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    char desc[DESC_SIZE], tmp_desc[DESC_SIZE];
 | 
			
		||||
    char *p_name, *tmp_str;
 | 
			
		||||
 | 
			
		||||
    /* the descriptor offset = 0x200 */
 | 
			
		||||
    if (bdrv_pread(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE)
 | 
			
		||||
        return -1;
 | 
			
		||||
 | 
			
		||||
    tmp_str = strstr(desc,"parentCID");
 | 
			
		||||
    pstrcpy(tmp_desc, sizeof(tmp_desc), tmp_str);
 | 
			
		||||
    if ((p_name = strstr(desc,"CID")) != 0) {
 | 
			
		||||
        p_name += sizeof("CID");
 | 
			
		||||
        snprintf(p_name, sizeof(desc) - (p_name - desc), "%x\n", cid);
 | 
			
		||||
        pstrcat(desc, sizeof(desc), tmp_desc);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (bdrv_pwrite(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE)
 | 
			
		||||
        return -1;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_is_cid_valid(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
#ifdef CHECK_CID
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    BlockDriverState *p_bs = s->hd->backing_hd;
 | 
			
		||||
    uint32_t cur_pcid;
 | 
			
		||||
 | 
			
		||||
    if (p_bs) {
 | 
			
		||||
        cur_pcid = vmdk_read_cid(p_bs,0);
 | 
			
		||||
        if (s->parent_cid != cur_pcid)
 | 
			
		||||
            // CID not valid
 | 
			
		||||
            return 0;
 | 
			
		||||
    }
 | 
			
		||||
#endif
 | 
			
		||||
    // CID valid
 | 
			
		||||
    return 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_snapshot_create(const char *filename, const char *backing_file)
 | 
			
		||||
{
 | 
			
		||||
    int snp_fd, p_fd;
 | 
			
		||||
    uint32_t p_cid;
 | 
			
		||||
    char *p_name, *gd_buf, *rgd_buf;
 | 
			
		||||
    const char *real_filename, *temp_str;
 | 
			
		||||
    VMDK4Header header;
 | 
			
		||||
    uint32_t gde_entries, gd_size;
 | 
			
		||||
    int64_t gd_offset, rgd_offset, capacity, gt_size;
 | 
			
		||||
    char p_desc[DESC_SIZE], s_desc[DESC_SIZE], hdr[HEADER_SIZE];
 | 
			
		||||
    static const char desc_template[] =
 | 
			
		||||
    "# Disk DescriptorFile\n"
 | 
			
		||||
    "version=1\n"
 | 
			
		||||
    "CID=%x\n"
 | 
			
		||||
    "parentCID=%x\n"
 | 
			
		||||
    "createType=\"monolithicSparse\"\n"
 | 
			
		||||
    "parentFileNameHint=\"%s\"\n"
 | 
			
		||||
    "\n"
 | 
			
		||||
    "# Extent description\n"
 | 
			
		||||
    "RW %u SPARSE \"%s\"\n"
 | 
			
		||||
    "\n"
 | 
			
		||||
    "# The Disk Data Base \n"
 | 
			
		||||
    "#DDB\n"
 | 
			
		||||
    "\n";
 | 
			
		||||
 | 
			
		||||
    snp_fd = open(filename, O_RDWR | O_CREAT | O_TRUNC | O_BINARY | O_LARGEFILE, 0644);
 | 
			
		||||
    if (snp_fd < 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    p_fd = open(backing_file, O_RDONLY | O_BINARY | O_LARGEFILE);
 | 
			
		||||
    if (p_fd < 0) {
 | 
			
		||||
        close(snp_fd);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* read the header */
 | 
			
		||||
    if (lseek(p_fd, 0x0, SEEK_SET) == -1)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (read(p_fd, hdr, HEADER_SIZE) != HEADER_SIZE)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    /* write the header */
 | 
			
		||||
    if (lseek(snp_fd, 0x0, SEEK_SET) == -1)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (write(snp_fd, hdr, HEADER_SIZE) == -1)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    memset(&header, 0, sizeof(header));
 | 
			
		||||
    memcpy(&header,&hdr[4], sizeof(header)); // skip the VMDK4_MAGIC
 | 
			
		||||
 | 
			
		||||
    ftruncate(snp_fd, header.grain_offset << 9);
 | 
			
		||||
    /* the descriptor offset = 0x200 */
 | 
			
		||||
    if (lseek(p_fd, 0x200, SEEK_SET) == -1)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (read(p_fd, p_desc, DESC_SIZE) != DESC_SIZE)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    if ((p_name = strstr(p_desc,"CID")) != 0) {
 | 
			
		||||
        p_name += sizeof("CID");
 | 
			
		||||
        sscanf(p_name,"%x",&p_cid);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    real_filename = filename;
 | 
			
		||||
    if ((temp_str = strrchr(real_filename, '\\')) != NULL)
 | 
			
		||||
        real_filename = temp_str + 1;
 | 
			
		||||
    if ((temp_str = strrchr(real_filename, '/')) != NULL)
 | 
			
		||||
        real_filename = temp_str + 1;
 | 
			
		||||
    if ((temp_str = strrchr(real_filename, ':')) != NULL)
 | 
			
		||||
        real_filename = temp_str + 1;
 | 
			
		||||
 | 
			
		||||
    snprintf(s_desc, sizeof(s_desc), desc_template, p_cid, p_cid, backing_file,
 | 
			
		||||
             (uint32_t)header.capacity, real_filename);
 | 
			
		||||
 | 
			
		||||
    /* write the descriptor */
 | 
			
		||||
    if (lseek(snp_fd, 0x200, SEEK_SET) == -1)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    if (write(snp_fd, s_desc, strlen(s_desc)) == -1)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    gd_offset = header.gd_offset * SECTOR_SIZE;     // offset of GD table
 | 
			
		||||
    rgd_offset = header.rgd_offset * SECTOR_SIZE;   // offset of RGD table
 | 
			
		||||
    capacity = header.capacity * SECTOR_SIZE;       // Extent size
 | 
			
		||||
    /*
 | 
			
		||||
     * Each GDE span 32M disk, means:
 | 
			
		||||
     * 512 GTE per GT, each GTE points to grain
 | 
			
		||||
     */
 | 
			
		||||
    gt_size = (int64_t)header.num_gtes_per_gte * header.granularity * SECTOR_SIZE;
 | 
			
		||||
    if (!gt_size)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    gde_entries = (uint32_t)(capacity / gt_size);  // number of gde/rgde
 | 
			
		||||
    gd_size = gde_entries * sizeof(uint32_t);
 | 
			
		||||
 | 
			
		||||
    /* write RGD */
 | 
			
		||||
    rgd_buf = qemu_malloc(gd_size);
 | 
			
		||||
    if (lseek(p_fd, rgd_offset, SEEK_SET) == -1)
 | 
			
		||||
        goto fail_rgd;
 | 
			
		||||
    if (read(p_fd, rgd_buf, gd_size) != gd_size)
 | 
			
		||||
        goto fail_rgd;
 | 
			
		||||
    if (lseek(snp_fd, rgd_offset, SEEK_SET) == -1)
 | 
			
		||||
        goto fail_rgd;
 | 
			
		||||
    if (write(snp_fd, rgd_buf, gd_size) == -1)
 | 
			
		||||
        goto fail_rgd;
 | 
			
		||||
    qemu_free(rgd_buf);
 | 
			
		||||
 | 
			
		||||
    /* write GD */
 | 
			
		||||
    gd_buf = qemu_malloc(gd_size);
 | 
			
		||||
    if (lseek(p_fd, gd_offset, SEEK_SET) == -1)
 | 
			
		||||
        goto fail_gd;
 | 
			
		||||
    if (read(p_fd, gd_buf, gd_size) != gd_size)
 | 
			
		||||
        goto fail_gd;
 | 
			
		||||
    if (lseek(snp_fd, gd_offset, SEEK_SET) == -1)
 | 
			
		||||
        goto fail_gd;
 | 
			
		||||
    if (write(snp_fd, gd_buf, gd_size) == -1)
 | 
			
		||||
        goto fail_gd;
 | 
			
		||||
    qemu_free(gd_buf);
 | 
			
		||||
 | 
			
		||||
    close(p_fd);
 | 
			
		||||
    close(snp_fd);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
    fail_gd:
 | 
			
		||||
    qemu_free(gd_buf);
 | 
			
		||||
    fail_rgd:
 | 
			
		||||
    qemu_free(rgd_buf);
 | 
			
		||||
    fail:
 | 
			
		||||
    close(p_fd);
 | 
			
		||||
    close(snp_fd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void vmdk_parent_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    if (bs->backing_hd)
 | 
			
		||||
        bdrv_close(bs->backing_hd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int parent_open = 0;
 | 
			
		||||
static int vmdk_parent_open(BlockDriverState *bs, const char * filename)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    char *p_name;
 | 
			
		||||
    char desc[DESC_SIZE];
 | 
			
		||||
    char parent_img_name[1024];
 | 
			
		||||
 | 
			
		||||
    /* the descriptor offset = 0x200 */
 | 
			
		||||
    if (bdrv_pread(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE)
 | 
			
		||||
        return -1;
 | 
			
		||||
 | 
			
		||||
    if ((p_name = strstr(desc,"parentFileNameHint")) != 0) {
 | 
			
		||||
        char *end_name;
 | 
			
		||||
        struct stat file_buf;
 | 
			
		||||
 | 
			
		||||
        p_name += sizeof("parentFileNameHint") + 1;
 | 
			
		||||
        if ((end_name = strchr(p_name,'\"')) == 0)
 | 
			
		||||
            return -1;
 | 
			
		||||
        if ((end_name - p_name) > sizeof (s->hd->backing_file) - 1)
 | 
			
		||||
            return -1;
 | 
			
		||||
 | 
			
		||||
        pstrcpy(s->hd->backing_file, end_name - p_name + 1, p_name);
 | 
			
		||||
        if (stat(s->hd->backing_file, &file_buf) != 0) {
 | 
			
		||||
            path_combine(parent_img_name, sizeof(parent_img_name),
 | 
			
		||||
                         filename, s->hd->backing_file);
 | 
			
		||||
        } else {
 | 
			
		||||
            pstrcpy(parent_img_name, sizeof(parent_img_name),
 | 
			
		||||
                    s->hd->backing_file);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        s->hd->backing_hd = bdrv_new("");
 | 
			
		||||
        if (!s->hd->backing_hd) {
 | 
			
		||||
            failure:
 | 
			
		||||
            bdrv_close(s->hd);
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        parent_open = 1;
 | 
			
		||||
        if (bdrv_open(s->hd->backing_hd, parent_img_name, BDRV_O_RDONLY) < 0)
 | 
			
		||||
            goto failure;
 | 
			
		||||
        parent_open = 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    uint32_t magic;
 | 
			
		||||
    int l1_size, i, ret;
 | 
			
		||||
 | 
			
		||||
    if (parent_open)
 | 
			
		||||
        // Parent must be opened as RO.
 | 
			
		||||
        flags = BDRV_O_RDONLY;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_file_open(&s->hd, filename, flags);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        return ret;
 | 
			
		||||
    if (bdrv_pread(s->hd, 0, &magic, sizeof(magic)) != sizeof(magic))
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    magic = be32_to_cpu(magic);
 | 
			
		||||
    if (magic == VMDK3_MAGIC) {
 | 
			
		||||
        VMDK3Header header;
 | 
			
		||||
 | 
			
		||||
        if (bdrv_pread(s->hd, sizeof(magic), &header, sizeof(header)) != sizeof(header))
 | 
			
		||||
            goto fail;
 | 
			
		||||
        s->cluster_sectors = le32_to_cpu(header.granularity);
 | 
			
		||||
        s->l2_size = 1 << 9;
 | 
			
		||||
        s->l1_size = 1 << 6;
 | 
			
		||||
        bs->total_sectors = le32_to_cpu(header.disk_sectors);
 | 
			
		||||
        s->l1_table_offset = le32_to_cpu(header.l1dir_offset) << 9;
 | 
			
		||||
        s->l1_backup_table_offset = 0;
 | 
			
		||||
        s->l1_entry_sectors = s->l2_size * s->cluster_sectors;
 | 
			
		||||
    } else if (magic == VMDK4_MAGIC) {
 | 
			
		||||
        VMDK4Header header;
 | 
			
		||||
 | 
			
		||||
        if (bdrv_pread(s->hd, sizeof(magic), &header, sizeof(header)) != sizeof(header))
 | 
			
		||||
            goto fail;
 | 
			
		||||
        bs->total_sectors = le64_to_cpu(header.capacity);
 | 
			
		||||
        s->cluster_sectors = le64_to_cpu(header.granularity);
 | 
			
		||||
        s->l2_size = le32_to_cpu(header.num_gtes_per_gte);
 | 
			
		||||
        s->l1_entry_sectors = s->l2_size * s->cluster_sectors;
 | 
			
		||||
        if (s->l1_entry_sectors <= 0)
 | 
			
		||||
            goto fail;
 | 
			
		||||
        s->l1_size = (bs->total_sectors + s->l1_entry_sectors - 1)
 | 
			
		||||
            / s->l1_entry_sectors;
 | 
			
		||||
        s->l1_table_offset = le64_to_cpu(header.rgd_offset) << 9;
 | 
			
		||||
        s->l1_backup_table_offset = le64_to_cpu(header.gd_offset) << 9;
 | 
			
		||||
 | 
			
		||||
        if (parent_open)
 | 
			
		||||
            s->is_parent = 1;
 | 
			
		||||
        else
 | 
			
		||||
            s->is_parent = 0;
 | 
			
		||||
 | 
			
		||||
        // try to open parent images, if exist
 | 
			
		||||
        if (vmdk_parent_open(bs, filename) != 0)
 | 
			
		||||
            goto fail;
 | 
			
		||||
        // write the CID once after the image creation
 | 
			
		||||
        s->parent_cid = vmdk_read_cid(bs,1);
 | 
			
		||||
    } else {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* read the L1 table */
 | 
			
		||||
    l1_size = s->l1_size * sizeof(uint32_t);
 | 
			
		||||
    s->l1_table = qemu_malloc(l1_size);
 | 
			
		||||
    if (bdrv_pread(s->hd, s->l1_table_offset, s->l1_table, l1_size) != l1_size)
 | 
			
		||||
        goto fail;
 | 
			
		||||
    for(i = 0; i < s->l1_size; i++) {
 | 
			
		||||
        le32_to_cpus(&s->l1_table[i]);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (s->l1_backup_table_offset) {
 | 
			
		||||
        s->l1_backup_table = qemu_malloc(l1_size);
 | 
			
		||||
        if (bdrv_pread(s->hd, s->l1_backup_table_offset, s->l1_backup_table, l1_size) != l1_size)
 | 
			
		||||
            goto fail;
 | 
			
		||||
        for(i = 0; i < s->l1_size; i++) {
 | 
			
		||||
            le32_to_cpus(&s->l1_backup_table[i]);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->l2_cache = qemu_malloc(s->l2_size * L2_CACHE_SIZE * sizeof(uint32_t));
 | 
			
		||||
    return 0;
 | 
			
		||||
 fail:
 | 
			
		||||
    qemu_free(s->l1_backup_table);
 | 
			
		||||
    qemu_free(s->l1_table);
 | 
			
		||||
    qemu_free(s->l2_cache);
 | 
			
		||||
    bdrv_delete(s->hd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static uint64_t get_cluster_offset(BlockDriverState *bs, VmdkMetaData *m_data,
 | 
			
		||||
                                   uint64_t offset, int allocate);
 | 
			
		||||
 | 
			
		||||
static int get_whole_cluster(BlockDriverState *bs, uint64_t cluster_offset,
 | 
			
		||||
                             uint64_t offset, int allocate)
 | 
			
		||||
{
 | 
			
		||||
    uint64_t parent_cluster_offset;
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    uint8_t  whole_grain[s->cluster_sectors*512];        // 128 sectors * 512 bytes each = grain size 64KB
 | 
			
		||||
 | 
			
		||||
    // we will be here if it's first write on non-exist grain(cluster).
 | 
			
		||||
    // try to read from parent image, if exist
 | 
			
		||||
    if (s->hd->backing_hd) {
 | 
			
		||||
        BDRVVmdkState *ps = s->hd->backing_hd->opaque;
 | 
			
		||||
 | 
			
		||||
        if (!vmdk_is_cid_valid(bs))
 | 
			
		||||
            return -1;
 | 
			
		||||
 | 
			
		||||
        parent_cluster_offset = get_cluster_offset(s->hd->backing_hd, NULL, offset, allocate);
 | 
			
		||||
 | 
			
		||||
        if (parent_cluster_offset) {
 | 
			
		||||
            BDRVVmdkState *act_s = activeBDRV.hd->opaque;
 | 
			
		||||
 | 
			
		||||
            if (bdrv_pread(ps->hd, parent_cluster_offset, whole_grain, ps->cluster_sectors*512) != ps->cluster_sectors*512)
 | 
			
		||||
                return -1;
 | 
			
		||||
 | 
			
		||||
            //Write grain only into the active image
 | 
			
		||||
            if (bdrv_pwrite(act_s->hd, activeBDRV.cluster_offset << 9, whole_grain, sizeof(whole_grain)) != sizeof(whole_grain))
 | 
			
		||||
                return -1;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_L2update(BlockDriverState *bs, VmdkMetaData *m_data)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    /* update L2 table */
 | 
			
		||||
    if (bdrv_pwrite(s->hd, ((int64_t)m_data->l2_offset * 512) + (m_data->l2_index * sizeof(m_data->offset)),
 | 
			
		||||
                    &(m_data->offset), sizeof(m_data->offset)) != sizeof(m_data->offset))
 | 
			
		||||
        return -1;
 | 
			
		||||
    /* update backup L2 table */
 | 
			
		||||
    if (s->l1_backup_table_offset != 0) {
 | 
			
		||||
        m_data->l2_offset = s->l1_backup_table[m_data->l1_index];
 | 
			
		||||
        if (bdrv_pwrite(s->hd, ((int64_t)m_data->l2_offset * 512) + (m_data->l2_index * sizeof(m_data->offset)),
 | 
			
		||||
                        &(m_data->offset), sizeof(m_data->offset)) != sizeof(m_data->offset))
 | 
			
		||||
            return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static uint64_t get_cluster_offset(BlockDriverState *bs, VmdkMetaData *m_data,
 | 
			
		||||
                                   uint64_t offset, int allocate)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    unsigned int l1_index, l2_offset, l2_index;
 | 
			
		||||
    int min_index, i, j;
 | 
			
		||||
    uint32_t min_count, *l2_table, tmp = 0;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    if (m_data)
 | 
			
		||||
        m_data->valid = 0;
 | 
			
		||||
 | 
			
		||||
    l1_index = (offset >> 9) / s->l1_entry_sectors;
 | 
			
		||||
    if (l1_index >= s->l1_size)
 | 
			
		||||
        return 0;
 | 
			
		||||
    l2_offset = s->l1_table[l1_index];
 | 
			
		||||
    if (!l2_offset)
 | 
			
		||||
        return 0;
 | 
			
		||||
    for(i = 0; i < L2_CACHE_SIZE; i++) {
 | 
			
		||||
        if (l2_offset == s->l2_cache_offsets[i]) {
 | 
			
		||||
            /* increment the hit count */
 | 
			
		||||
            if (++s->l2_cache_counts[i] == 0xffffffff) {
 | 
			
		||||
                for(j = 0; j < L2_CACHE_SIZE; j++) {
 | 
			
		||||
                    s->l2_cache_counts[j] >>= 1;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
            l2_table = s->l2_cache + (i * s->l2_size);
 | 
			
		||||
            goto found;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    /* not found: load a new entry in the least used one */
 | 
			
		||||
    min_index = 0;
 | 
			
		||||
    min_count = 0xffffffff;
 | 
			
		||||
    for(i = 0; i < L2_CACHE_SIZE; i++) {
 | 
			
		||||
        if (s->l2_cache_counts[i] < min_count) {
 | 
			
		||||
            min_count = s->l2_cache_counts[i];
 | 
			
		||||
            min_index = i;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    l2_table = s->l2_cache + (min_index * s->l2_size);
 | 
			
		||||
    if (bdrv_pread(s->hd, (int64_t)l2_offset * 512, l2_table, s->l2_size * sizeof(uint32_t)) !=
 | 
			
		||||
                                                                        s->l2_size * sizeof(uint32_t))
 | 
			
		||||
        return 0;
 | 
			
		||||
 | 
			
		||||
    s->l2_cache_offsets[min_index] = l2_offset;
 | 
			
		||||
    s->l2_cache_counts[min_index] = 1;
 | 
			
		||||
 found:
 | 
			
		||||
    l2_index = ((offset >> 9) / s->cluster_sectors) % s->l2_size;
 | 
			
		||||
    cluster_offset = le32_to_cpu(l2_table[l2_index]);
 | 
			
		||||
 | 
			
		||||
    if (!cluster_offset) {
 | 
			
		||||
        if (!allocate)
 | 
			
		||||
            return 0;
 | 
			
		||||
        // Avoid the L2 tables update for the images that have snapshots.
 | 
			
		||||
        if (!s->is_parent) {
 | 
			
		||||
            cluster_offset = bdrv_getlength(s->hd);
 | 
			
		||||
            bdrv_truncate(s->hd, cluster_offset + (s->cluster_sectors << 9));
 | 
			
		||||
 | 
			
		||||
            cluster_offset >>= 9;
 | 
			
		||||
            tmp = cpu_to_le32(cluster_offset);
 | 
			
		||||
            l2_table[l2_index] = tmp;
 | 
			
		||||
            // Save the active image state
 | 
			
		||||
            activeBDRV.cluster_offset = cluster_offset;
 | 
			
		||||
            activeBDRV.hd = bs;
 | 
			
		||||
        }
 | 
			
		||||
        /* First of all we write grain itself, to avoid race condition
 | 
			
		||||
         * that may to corrupt the image.
 | 
			
		||||
         * This problem may occur because of insufficient space on host disk
 | 
			
		||||
         * or inappropriate VM shutdown.
 | 
			
		||||
         */
 | 
			
		||||
        if (get_whole_cluster(bs, cluster_offset, offset, allocate) == -1)
 | 
			
		||||
            return 0;
 | 
			
		||||
 | 
			
		||||
        if (m_data) {
 | 
			
		||||
            m_data->offset = tmp;
 | 
			
		||||
            m_data->l1_index = l1_index;
 | 
			
		||||
            m_data->l2_index = l2_index;
 | 
			
		||||
            m_data->l2_offset = l2_offset;
 | 
			
		||||
            m_data->valid = 1;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    cluster_offset <<= 9;
 | 
			
		||||
    return cluster_offset;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_is_allocated(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                             int nb_sectors, int *pnum)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    cluster_offset = get_cluster_offset(bs, NULL, sector_num << 9, 0);
 | 
			
		||||
    index_in_cluster = sector_num % s->cluster_sectors;
 | 
			
		||||
    n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
    if (n > nb_sectors)
 | 
			
		||||
        n = nb_sectors;
 | 
			
		||||
    *pnum = n;
 | 
			
		||||
    return (cluster_offset != 0);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster, n, ret;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, NULL, sector_num << 9, 0);
 | 
			
		||||
        index_in_cluster = sector_num % s->cluster_sectors;
 | 
			
		||||
        n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
        if (n > nb_sectors)
 | 
			
		||||
            n = nb_sectors;
 | 
			
		||||
        if (!cluster_offset) {
 | 
			
		||||
            // try to read from parent image, if exist
 | 
			
		||||
            if (s->hd->backing_hd) {
 | 
			
		||||
                if (!vmdk_is_cid_valid(bs))
 | 
			
		||||
                    return -1;
 | 
			
		||||
                ret = bdrv_read(s->hd->backing_hd, sector_num, buf, n);
 | 
			
		||||
                if (ret < 0)
 | 
			
		||||
                    return -1;
 | 
			
		||||
            } else {
 | 
			
		||||
                memset(buf, 0, 512 * n);
 | 
			
		||||
            }
 | 
			
		||||
        } else {
 | 
			
		||||
            if(bdrv_pread(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512) != n * 512)
 | 
			
		||||
                return -1;
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                     const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    VmdkMetaData m_data;
 | 
			
		||||
    int index_in_cluster, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
    static int cid_update = 0;
 | 
			
		||||
 | 
			
		||||
    if (sector_num > bs->total_sectors) {
 | 
			
		||||
        fprintf(stderr,
 | 
			
		||||
                "(VMDK) Wrong offset: sector_num=0x%" PRIx64
 | 
			
		||||
                " total_sectors=0x%" PRIx64 "\n",
 | 
			
		||||
                sector_num, bs->total_sectors);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
        n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
        if (n > nb_sectors)
 | 
			
		||||
            n = nb_sectors;
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, &m_data, sector_num << 9, 1);
 | 
			
		||||
        if (!cluster_offset)
 | 
			
		||||
            return -1;
 | 
			
		||||
 | 
			
		||||
        if (bdrv_pwrite(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512) != n * 512)
 | 
			
		||||
            return -1;
 | 
			
		||||
        if (m_data.valid) {
 | 
			
		||||
            /* update L2 tables */
 | 
			
		||||
            if (vmdk_L2update(bs, &m_data) == -1)
 | 
			
		||||
                return -1;
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
 | 
			
		||||
        // update CID on the first write every time the virtual disk is opened
 | 
			
		||||
        if (!cid_update) {
 | 
			
		||||
            vmdk_write_cid(bs, time(NULL));
 | 
			
		||||
            cid_update++;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vmdk_create(const char *filename, int64_t total_size,
 | 
			
		||||
                       const char *backing_file, int flags)
 | 
			
		||||
{
 | 
			
		||||
    int fd, i;
 | 
			
		||||
    VMDK4Header header;
 | 
			
		||||
    uint32_t tmp, magic, grains, gd_size, gt_size, gt_count;
 | 
			
		||||
    static const char desc_template[] =
 | 
			
		||||
        "# Disk DescriptorFile\n"
 | 
			
		||||
        "version=1\n"
 | 
			
		||||
        "CID=%x\n"
 | 
			
		||||
        "parentCID=ffffffff\n"
 | 
			
		||||
        "createType=\"monolithicSparse\"\n"
 | 
			
		||||
        "\n"
 | 
			
		||||
        "# Extent description\n"
 | 
			
		||||
        "RW %" PRId64 " SPARSE \"%s\"\n"
 | 
			
		||||
        "\n"
 | 
			
		||||
        "# The Disk Data Base \n"
 | 
			
		||||
        "#DDB\n"
 | 
			
		||||
        "\n"
 | 
			
		||||
        "ddb.virtualHWVersion = \"%d\"\n"
 | 
			
		||||
        "ddb.geometry.cylinders = \"%" PRId64 "\"\n"
 | 
			
		||||
        "ddb.geometry.heads = \"16\"\n"
 | 
			
		||||
        "ddb.geometry.sectors = \"63\"\n"
 | 
			
		||||
        "ddb.adapterType = \"ide\"\n";
 | 
			
		||||
    char desc[1024];
 | 
			
		||||
    const char *real_filename, *temp_str;
 | 
			
		||||
 | 
			
		||||
    /* XXX: add support for backing file */
 | 
			
		||||
    if (backing_file) {
 | 
			
		||||
        return vmdk_snapshot_create(filename, backing_file);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY | O_LARGEFILE,
 | 
			
		||||
              0644);
 | 
			
		||||
    if (fd < 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    magic = cpu_to_be32(VMDK4_MAGIC);
 | 
			
		||||
    memset(&header, 0, sizeof(header));
 | 
			
		||||
    header.version = cpu_to_le32(1);
 | 
			
		||||
    header.flags = cpu_to_le32(3); /* ?? */
 | 
			
		||||
    header.capacity = cpu_to_le64(total_size);
 | 
			
		||||
    header.granularity = cpu_to_le64(128);
 | 
			
		||||
    header.num_gtes_per_gte = cpu_to_le32(512);
 | 
			
		||||
 | 
			
		||||
    grains = (total_size + header.granularity - 1) / header.granularity;
 | 
			
		||||
    gt_size = ((header.num_gtes_per_gte * sizeof(uint32_t)) + 511) >> 9;
 | 
			
		||||
    gt_count = (grains + header.num_gtes_per_gte - 1) / header.num_gtes_per_gte;
 | 
			
		||||
    gd_size = (gt_count * sizeof(uint32_t) + 511) >> 9;
 | 
			
		||||
 | 
			
		||||
    header.desc_offset = 1;
 | 
			
		||||
    header.desc_size = 20;
 | 
			
		||||
    header.rgd_offset = header.desc_offset + header.desc_size;
 | 
			
		||||
    header.gd_offset = header.rgd_offset + gd_size + (gt_size * gt_count);
 | 
			
		||||
    header.grain_offset =
 | 
			
		||||
       ((header.gd_offset + gd_size + (gt_size * gt_count) +
 | 
			
		||||
         header.granularity - 1) / header.granularity) *
 | 
			
		||||
        header.granularity;
 | 
			
		||||
 | 
			
		||||
    header.desc_offset = cpu_to_le64(header.desc_offset);
 | 
			
		||||
    header.desc_size = cpu_to_le64(header.desc_size);
 | 
			
		||||
    header.rgd_offset = cpu_to_le64(header.rgd_offset);
 | 
			
		||||
    header.gd_offset = cpu_to_le64(header.gd_offset);
 | 
			
		||||
    header.grain_offset = cpu_to_le64(header.grain_offset);
 | 
			
		||||
 | 
			
		||||
    header.check_bytes[0] = 0xa;
 | 
			
		||||
    header.check_bytes[1] = 0x20;
 | 
			
		||||
    header.check_bytes[2] = 0xd;
 | 
			
		||||
    header.check_bytes[3] = 0xa;
 | 
			
		||||
 | 
			
		||||
    /* write all the data */
 | 
			
		||||
    write(fd, &magic, sizeof(magic));
 | 
			
		||||
    write(fd, &header, sizeof(header));
 | 
			
		||||
 | 
			
		||||
    ftruncate(fd, header.grain_offset << 9);
 | 
			
		||||
 | 
			
		||||
    /* write grain directory */
 | 
			
		||||
    lseek(fd, le64_to_cpu(header.rgd_offset) << 9, SEEK_SET);
 | 
			
		||||
    for (i = 0, tmp = header.rgd_offset + gd_size;
 | 
			
		||||
         i < gt_count; i++, tmp += gt_size)
 | 
			
		||||
        write(fd, &tmp, sizeof(tmp));
 | 
			
		||||
 | 
			
		||||
    /* write backup grain directory */
 | 
			
		||||
    lseek(fd, le64_to_cpu(header.gd_offset) << 9, SEEK_SET);
 | 
			
		||||
    for (i = 0, tmp = header.gd_offset + gd_size;
 | 
			
		||||
         i < gt_count; i++, tmp += gt_size)
 | 
			
		||||
        write(fd, &tmp, sizeof(tmp));
 | 
			
		||||
 | 
			
		||||
    /* compose the descriptor */
 | 
			
		||||
    real_filename = filename;
 | 
			
		||||
    if ((temp_str = strrchr(real_filename, '\\')) != NULL)
 | 
			
		||||
        real_filename = temp_str + 1;
 | 
			
		||||
    if ((temp_str = strrchr(real_filename, '/')) != NULL)
 | 
			
		||||
        real_filename = temp_str + 1;
 | 
			
		||||
    if ((temp_str = strrchr(real_filename, ':')) != NULL)
 | 
			
		||||
        real_filename = temp_str + 1;
 | 
			
		||||
    snprintf(desc, sizeof(desc), desc_template, (unsigned int)time(NULL),
 | 
			
		||||
             total_size, real_filename,
 | 
			
		||||
             (flags & BLOCK_FLAG_COMPAT6 ? 6 : 4),
 | 
			
		||||
             total_size / (int64_t)(63 * 16));
 | 
			
		||||
 | 
			
		||||
    /* write the descriptor */
 | 
			
		||||
    lseek(fd, le64_to_cpu(header.desc_offset) << 9, SEEK_SET);
 | 
			
		||||
    write(fd, desc, strlen(desc));
 | 
			
		||||
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void vmdk_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_free(s->l1_table);
 | 
			
		||||
    qemu_free(s->l2_cache);
 | 
			
		||||
    // try to close parent image, if exist
 | 
			
		||||
    vmdk_parent_close(s->hd);
 | 
			
		||||
    bdrv_delete(s->hd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void vmdk_flush(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVmdkState *s = bs->opaque;
 | 
			
		||||
    bdrv_flush(s->hd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_vmdk = {
 | 
			
		||||
    "vmdk",
 | 
			
		||||
    sizeof(BDRVVmdkState),
 | 
			
		||||
    vmdk_probe,
 | 
			
		||||
    vmdk_open,
 | 
			
		||||
    vmdk_read,
 | 
			
		||||
    vmdk_write,
 | 
			
		||||
    vmdk_close,
 | 
			
		||||
    vmdk_create,
 | 
			
		||||
    vmdk_flush,
 | 
			
		||||
    vmdk_is_allocated,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										593
									
								
								block-vpc.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										593
									
								
								block-vpc.c
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,593 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for Conectix/Microsoft Virtual PC images
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2005 Alex Beregszaszi
 | 
			
		||||
 * Copyright (c) 2009 Kevin Wolf <kwolf@suse.de>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block_int.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
 | 
			
		||||
#define HEADER_SIZE 512
 | 
			
		||||
 | 
			
		||||
//#define CACHE
 | 
			
		||||
 | 
			
		||||
enum vhd_type {
 | 
			
		||||
    VHD_FIXED           = 2,
 | 
			
		||||
    VHD_DYNAMIC         = 3,
 | 
			
		||||
    VHD_DIFFERENCING    = 4,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
// Seconds since Jan 1, 2000 0:00:00 (UTC)
 | 
			
		||||
#define VHD_TIMESTAMP_BASE 946684800
 | 
			
		||||
 | 
			
		||||
// always big-endian
 | 
			
		||||
struct vhd_footer {
 | 
			
		||||
    char        creator[8]; // "conectix"
 | 
			
		||||
    uint32_t    features;
 | 
			
		||||
    uint32_t    version;
 | 
			
		||||
 | 
			
		||||
    // Offset of next header structure, 0xFFFFFFFF if none
 | 
			
		||||
    uint64_t    data_offset;
 | 
			
		||||
 | 
			
		||||
    // Seconds since Jan 1, 2000 0:00:00 (UTC)
 | 
			
		||||
    uint32_t    timestamp;
 | 
			
		||||
 | 
			
		||||
    char        creator_app[4]; // "vpc "
 | 
			
		||||
    uint16_t    major;
 | 
			
		||||
    uint16_t    minor;
 | 
			
		||||
    char        creator_os[4]; // "Wi2k"
 | 
			
		||||
 | 
			
		||||
    uint64_t    orig_size;
 | 
			
		||||
    uint64_t    size;
 | 
			
		||||
 | 
			
		||||
    uint16_t    cyls;
 | 
			
		||||
    uint8_t     heads;
 | 
			
		||||
    uint8_t     secs_per_cyl;
 | 
			
		||||
 | 
			
		||||
    uint32_t    type;
 | 
			
		||||
 | 
			
		||||
    // Checksum of the Hard Disk Footer ("one's complement of the sum of all
 | 
			
		||||
    // the bytes in the footer without the checksum field")
 | 
			
		||||
    uint32_t    checksum;
 | 
			
		||||
 | 
			
		||||
    // UUID used to identify a parent hard disk (backing file)
 | 
			
		||||
    uint8_t     uuid[16];
 | 
			
		||||
 | 
			
		||||
    uint8_t     in_saved_state;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
struct vhd_dyndisk_header {
 | 
			
		||||
    char        magic[8]; // "cxsparse"
 | 
			
		||||
 | 
			
		||||
    // Offset of next header structure, 0xFFFFFFFF if none
 | 
			
		||||
    uint64_t    data_offset;
 | 
			
		||||
 | 
			
		||||
    // Offset of the Block Allocation Table (BAT)
 | 
			
		||||
    uint64_t    table_offset;
 | 
			
		||||
 | 
			
		||||
    uint32_t    version;
 | 
			
		||||
    uint32_t    max_table_entries; // 32bit/entry
 | 
			
		||||
 | 
			
		||||
    // 2 MB by default, must be a power of two
 | 
			
		||||
    uint32_t    block_size;
 | 
			
		||||
 | 
			
		||||
    uint32_t    checksum;
 | 
			
		||||
    uint8_t     parent_uuid[16];
 | 
			
		||||
    uint32_t    parent_timestamp;
 | 
			
		||||
    uint32_t    reserved;
 | 
			
		||||
 | 
			
		||||
    // Backing file name (in UTF-16)
 | 
			
		||||
    uint8_t     parent_name[512];
 | 
			
		||||
 | 
			
		||||
    struct {
 | 
			
		||||
        uint32_t    platform;
 | 
			
		||||
        uint32_t    data_space;
 | 
			
		||||
        uint32_t    data_length;
 | 
			
		||||
        uint32_t    reserved;
 | 
			
		||||
        uint64_t    data_offset;
 | 
			
		||||
    } parent_locator[8];
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVVPCState {
 | 
			
		||||
    BlockDriverState *hd;
 | 
			
		||||
 | 
			
		||||
    uint8_t footer_buf[HEADER_SIZE];
 | 
			
		||||
    uint64_t free_data_block_offset;
 | 
			
		||||
    int max_table_entries;
 | 
			
		||||
    uint32_t *pagetable;
 | 
			
		||||
    uint64_t bat_offset;
 | 
			
		||||
    uint64_t last_bitmap_offset;
 | 
			
		||||
 | 
			
		||||
    uint32_t block_size;
 | 
			
		||||
    uint32_t bitmap_size;
 | 
			
		||||
 | 
			
		||||
#ifdef CACHE
 | 
			
		||||
    uint8_t *pageentry_u8;
 | 
			
		||||
    uint32_t *pageentry_u32;
 | 
			
		||||
    uint16_t *pageentry_u16;
 | 
			
		||||
 | 
			
		||||
    uint64_t last_bitmap;
 | 
			
		||||
#endif
 | 
			
		||||
} BDRVVPCState;
 | 
			
		||||
 | 
			
		||||
static uint32_t vpc_checksum(uint8_t* buf, size_t size)
 | 
			
		||||
{
 | 
			
		||||
    uint32_t res = 0;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < size; i++)
 | 
			
		||||
        res += buf[i];
 | 
			
		||||
 | 
			
		||||
    return ~res;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static int vpc_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    if (buf_size >= 8 && !strncmp((char *)buf, "conectix", 8))
 | 
			
		||||
	return 100;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vpc_open(BlockDriverState *bs, const char *filename, int flags)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    int ret, i;
 | 
			
		||||
    struct vhd_footer* footer;
 | 
			
		||||
    struct vhd_dyndisk_header* dyndisk_header;
 | 
			
		||||
    uint8_t buf[HEADER_SIZE];
 | 
			
		||||
    uint32_t checksum;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_file_open(&s->hd, filename, flags);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        return ret;
 | 
			
		||||
 | 
			
		||||
    if (bdrv_pread(s->hd, 0, s->footer_buf, HEADER_SIZE) != HEADER_SIZE)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    footer = (struct vhd_footer*) s->footer_buf;
 | 
			
		||||
    if (strncmp(footer->creator, "conectix", 8))
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    checksum = be32_to_cpu(footer->checksum);
 | 
			
		||||
    footer->checksum = 0;
 | 
			
		||||
    if (vpc_checksum(s->footer_buf, HEADER_SIZE) != checksum)
 | 
			
		||||
        fprintf(stderr, "block-vpc: The header checksum of '%s' is "
 | 
			
		||||
            "incorrect.\n", filename);
 | 
			
		||||
 | 
			
		||||
    // The visible size of a image in Virtual PC depends on the geometry
 | 
			
		||||
    // rather than on the size stored in the footer (the size in the footer
 | 
			
		||||
    // is too large usually)
 | 
			
		||||
    bs->total_sectors = (int64_t)
 | 
			
		||||
        be16_to_cpu(footer->cyls) * footer->heads * footer->secs_per_cyl;
 | 
			
		||||
 | 
			
		||||
    if (bdrv_pread(s->hd, be64_to_cpu(footer->data_offset), buf, HEADER_SIZE)
 | 
			
		||||
            != HEADER_SIZE)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    dyndisk_header = (struct vhd_dyndisk_header*) buf;
 | 
			
		||||
 | 
			
		||||
    if (strncmp(dyndisk_header->magic, "cxsparse", 8))
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    s->block_size = be32_to_cpu(dyndisk_header->block_size);
 | 
			
		||||
    s->bitmap_size = ((s->block_size / (8 * 512)) + 511) & ~511;
 | 
			
		||||
 | 
			
		||||
    s->max_table_entries = be32_to_cpu(dyndisk_header->max_table_entries);
 | 
			
		||||
    s->pagetable = qemu_malloc(s->max_table_entries * 4);
 | 
			
		||||
 | 
			
		||||
    s->bat_offset = be64_to_cpu(dyndisk_header->table_offset);
 | 
			
		||||
    if (bdrv_pread(s->hd, s->bat_offset, s->pagetable,
 | 
			
		||||
            s->max_table_entries * 4) != s->max_table_entries * 4)
 | 
			
		||||
	    goto fail;
 | 
			
		||||
 | 
			
		||||
    s->free_data_block_offset =
 | 
			
		||||
        (s->bat_offset + (s->max_table_entries * 4) + 511) & ~511;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < s->max_table_entries; i++) {
 | 
			
		||||
        be32_to_cpus(&s->pagetable[i]);
 | 
			
		||||
        if (s->pagetable[i] != 0xFFFFFFFF) {
 | 
			
		||||
            int64_t next = (512 * (int64_t) s->pagetable[i]) +
 | 
			
		||||
                s->bitmap_size + s->block_size;
 | 
			
		||||
 | 
			
		||||
            if (next> s->free_data_block_offset)
 | 
			
		||||
                s->free_data_block_offset = next;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->last_bitmap_offset = (int64_t) -1;
 | 
			
		||||
 | 
			
		||||
#ifdef CACHE
 | 
			
		||||
    s->pageentry_u8 = qemu_malloc(512);
 | 
			
		||||
    s->pageentry_u32 = s->pageentry_u8;
 | 
			
		||||
    s->pageentry_u16 = s->pageentry_u8;
 | 
			
		||||
    s->last_pagetable = -1;
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
 fail:
 | 
			
		||||
    bdrv_delete(s->hd);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Returns the absolute byte offset of the given sector in the image file.
 | 
			
		||||
 * If the sector is not allocated, -1 is returned instead.
 | 
			
		||||
 *
 | 
			
		||||
 * The parameter write must be 1 if the offset will be used for a write
 | 
			
		||||
 * operation (the block bitmaps is updated then), 0 otherwise.
 | 
			
		||||
 */
 | 
			
		||||
static inline int64_t get_sector_offset(BlockDriverState *bs,
 | 
			
		||||
    int64_t sector_num, int write)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    uint64_t offset = sector_num * 512;
 | 
			
		||||
    uint64_t bitmap_offset, block_offset;
 | 
			
		||||
    uint32_t pagetable_index, pageentry_index;
 | 
			
		||||
 | 
			
		||||
    pagetable_index = offset / s->block_size;
 | 
			
		||||
    pageentry_index = (offset % s->block_size) / 512;
 | 
			
		||||
 | 
			
		||||
    if (pagetable_index >= s->max_table_entries || s->pagetable[pagetable_index] == 0xffffffff)
 | 
			
		||||
        return -1; // not allocated
 | 
			
		||||
 | 
			
		||||
    bitmap_offset = 512 * (uint64_t) s->pagetable[pagetable_index];
 | 
			
		||||
    block_offset = bitmap_offset + s->bitmap_size + (512 * pageentry_index);
 | 
			
		||||
 | 
			
		||||
    // We must ensure that we don't write to any sectors which are marked as
 | 
			
		||||
    // unused in the bitmap. We get away with setting all bits in the block
 | 
			
		||||
    // bitmap each time we write to a new block. This might cause Virtual PC to
 | 
			
		||||
    // miss sparse read optimization, but it's not a problem in terms of
 | 
			
		||||
    // correctness.
 | 
			
		||||
    if (write && (s->last_bitmap_offset != bitmap_offset)) {
 | 
			
		||||
        uint8_t bitmap[s->bitmap_size];
 | 
			
		||||
 | 
			
		||||
        s->last_bitmap_offset = bitmap_offset;
 | 
			
		||||
        memset(bitmap, 0xff, s->bitmap_size);
 | 
			
		||||
        bdrv_pwrite(s->hd, bitmap_offset, bitmap, s->bitmap_size);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
//    printf("sector: %" PRIx64 ", index: %x, offset: %x, bioff: %" PRIx64 ", bloff: %" PRIx64 "\n",
 | 
			
		||||
//	sector_num, pagetable_index, pageentry_index,
 | 
			
		||||
//	bitmap_offset, block_offset);
 | 
			
		||||
 | 
			
		||||
// disabled by reason
 | 
			
		||||
#if 0
 | 
			
		||||
#ifdef CACHE
 | 
			
		||||
    if (bitmap_offset != s->last_bitmap)
 | 
			
		||||
    {
 | 
			
		||||
	lseek(s->fd, bitmap_offset, SEEK_SET);
 | 
			
		||||
 | 
			
		||||
	s->last_bitmap = bitmap_offset;
 | 
			
		||||
 | 
			
		||||
	// Scary! Bitmap is stored as big endian 32bit entries,
 | 
			
		||||
	// while we used to look it up byte by byte
 | 
			
		||||
	read(s->fd, s->pageentry_u8, 512);
 | 
			
		||||
	for (i = 0; i < 128; i++)
 | 
			
		||||
	    be32_to_cpus(&s->pageentry_u32[i]);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if ((s->pageentry_u8[pageentry_index / 8] >> (pageentry_index % 8)) & 1)
 | 
			
		||||
	return -1;
 | 
			
		||||
#else
 | 
			
		||||
    lseek(s->fd, bitmap_offset + (pageentry_index / 8), SEEK_SET);
 | 
			
		||||
 | 
			
		||||
    read(s->fd, &bitmap_entry, 1);
 | 
			
		||||
 | 
			
		||||
    if ((bitmap_entry >> (pageentry_index % 8)) & 1)
 | 
			
		||||
	return -1; // not allocated
 | 
			
		||||
#endif
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
    return block_offset;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Writes the footer to the end of the image file. This is needed when the
 | 
			
		||||
 * file grows as it overwrites the old footer
 | 
			
		||||
 *
 | 
			
		||||
 * Returns 0 on success and < 0 on error
 | 
			
		||||
 */
 | 
			
		||||
static int rewrite_footer(BlockDriverState* bs)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    int64_t offset = s->free_data_block_offset;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pwrite(s->hd, offset, s->footer_buf, HEADER_SIZE);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        return ret;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Allocates a new block. This involves writing a new footer and updating
 | 
			
		||||
 * the Block Allocation Table to use the space at the old end of the image
 | 
			
		||||
 * file (overwriting the old footer)
 | 
			
		||||
 *
 | 
			
		||||
 * Returns the sectors' offset in the image file on success and < 0 on error
 | 
			
		||||
 */
 | 
			
		||||
static int64_t alloc_block(BlockDriverState* bs, int64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    int64_t bat_offset;
 | 
			
		||||
    uint32_t index, bat_value;
 | 
			
		||||
    int ret;
 | 
			
		||||
    uint8_t bitmap[s->bitmap_size];
 | 
			
		||||
 | 
			
		||||
    // Check if sector_num is valid
 | 
			
		||||
    if ((sector_num < 0) || (sector_num > bs->total_sectors))
 | 
			
		||||
        return -1;
 | 
			
		||||
 | 
			
		||||
    // Write entry into in-memory BAT
 | 
			
		||||
    index = (sector_num * 512) / s->block_size;
 | 
			
		||||
    if (s->pagetable[index] != 0xFFFFFFFF)
 | 
			
		||||
        return -1;
 | 
			
		||||
 | 
			
		||||
    s->pagetable[index] = s->free_data_block_offset / 512;
 | 
			
		||||
 | 
			
		||||
    // Initialize the block's bitmap
 | 
			
		||||
    memset(bitmap, 0xff, s->bitmap_size);
 | 
			
		||||
    bdrv_pwrite(s->hd, s->free_data_block_offset, bitmap, s->bitmap_size);
 | 
			
		||||
 | 
			
		||||
    // Write new footer (the old one will be overwritten)
 | 
			
		||||
    s->free_data_block_offset += s->block_size + s->bitmap_size;
 | 
			
		||||
    ret = rewrite_footer(bs);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    // Write BAT entry to disk
 | 
			
		||||
    bat_offset = s->bat_offset + (4 * index);
 | 
			
		||||
    bat_value = be32_to_cpu(s->pagetable[index]);
 | 
			
		||||
    ret = bdrv_pwrite(s->hd, bat_offset, &bat_value, 4);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        goto fail;
 | 
			
		||||
 | 
			
		||||
    return get_sector_offset(bs, sector_num, 0);
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    s->free_data_block_offset -= (s->block_size + s->bitmap_size);
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vpc_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    int ret;
 | 
			
		||||
    int64_t offset;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        offset = get_sector_offset(bs, sector_num, 0);
 | 
			
		||||
 | 
			
		||||
        if (offset == -1) {
 | 
			
		||||
            memset(buf, 0, 512);
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = bdrv_pread(s->hd, offset, buf, 512);
 | 
			
		||||
            if (ret != 512)
 | 
			
		||||
                return -1;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        nb_sectors--;
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vpc_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
    const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    int64_t offset;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        offset = get_sector_offset(bs, sector_num, 1);
 | 
			
		||||
 | 
			
		||||
        if (offset == -1) {
 | 
			
		||||
            offset = alloc_block(bs, sector_num);
 | 
			
		||||
            if (offset < 0)
 | 
			
		||||
                return -1;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        ret = bdrv_pwrite(s->hd, offset, buf, 512);
 | 
			
		||||
        if (ret != 512)
 | 
			
		||||
            return -1;
 | 
			
		||||
 | 
			
		||||
        nb_sectors--;
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Calculates the number of cylinders, heads and sectors per cylinder
 | 
			
		||||
 * based on a given number of sectors. This is the algorithm described
 | 
			
		||||
 * in the VHD specification.
 | 
			
		||||
 *
 | 
			
		||||
 * Note that the geometry doesn't always exactly match total_sectors but
 | 
			
		||||
 * may round it down.
 | 
			
		||||
 */
 | 
			
		||||
static void calculate_geometry(int64_t total_sectors, uint16_t* cyls,
 | 
			
		||||
    uint8_t* heads, uint8_t* secs_per_cyl)
 | 
			
		||||
{
 | 
			
		||||
    uint32_t cyls_times_heads;
 | 
			
		||||
 | 
			
		||||
    if (total_sectors > 65535 * 16 * 255)
 | 
			
		||||
        total_sectors = 65535 * 16 * 255;
 | 
			
		||||
 | 
			
		||||
    if (total_sectors > 65535 * 16 * 63) {
 | 
			
		||||
        *secs_per_cyl = 255;
 | 
			
		||||
        *heads = 16;
 | 
			
		||||
        cyls_times_heads = total_sectors / *secs_per_cyl;
 | 
			
		||||
    } else {
 | 
			
		||||
        *secs_per_cyl = 17;
 | 
			
		||||
        cyls_times_heads = total_sectors / *secs_per_cyl;
 | 
			
		||||
        *heads = (cyls_times_heads + 1023) / 1024;
 | 
			
		||||
 | 
			
		||||
        if (*heads < 4)
 | 
			
		||||
            *heads = 4;
 | 
			
		||||
 | 
			
		||||
        if (cyls_times_heads >= (*heads * 1024) || *heads > 16) {
 | 
			
		||||
            *secs_per_cyl = 31;
 | 
			
		||||
            *heads = 16;
 | 
			
		||||
            cyls_times_heads = total_sectors / *secs_per_cyl;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (cyls_times_heads >= (*heads * 1024)) {
 | 
			
		||||
            *secs_per_cyl = 63;
 | 
			
		||||
            *heads = 16;
 | 
			
		||||
            cyls_times_heads = total_sectors / *secs_per_cyl;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    // Note: Rounding up deviates from the Virtual PC behaviour
 | 
			
		||||
    // However, we need this to avoid truncating images in qemu-img convert
 | 
			
		||||
    *cyls = (cyls_times_heads + *heads - 1) / *heads;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int vpc_create(const char *filename, int64_t total_sectors,
 | 
			
		||||
    const char *backing_file, int flags)
 | 
			
		||||
{
 | 
			
		||||
    uint8_t buf[1024];
 | 
			
		||||
    struct vhd_footer* footer = (struct vhd_footer*) buf;
 | 
			
		||||
    struct vhd_dyndisk_header* dyndisk_header =
 | 
			
		||||
        (struct vhd_dyndisk_header*) buf;
 | 
			
		||||
    int fd, i;
 | 
			
		||||
    uint16_t cyls;
 | 
			
		||||
    uint8_t heads;
 | 
			
		||||
    uint8_t secs_per_cyl;
 | 
			
		||||
    size_t block_size, num_bat_entries;
 | 
			
		||||
 | 
			
		||||
    if (backing_file != NULL)
 | 
			
		||||
        return -ENOTSUP;
 | 
			
		||||
 | 
			
		||||
    fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, 0644);
 | 
			
		||||
    if (fd < 0)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    // Calculate matching total_size and geometry
 | 
			
		||||
    calculate_geometry(total_sectors, &cyls, &heads, &secs_per_cyl);
 | 
			
		||||
    total_sectors = (int64_t) cyls * heads * secs_per_cyl;
 | 
			
		||||
 | 
			
		||||
    // Prepare the Hard Disk Footer
 | 
			
		||||
    memset(buf, 0, 1024);
 | 
			
		||||
 | 
			
		||||
    strncpy(footer->creator, "conectix", 8);
 | 
			
		||||
    // TODO Check if "qemu" creator_app is ok for VPC
 | 
			
		||||
    strncpy(footer->creator_app, "qemu", 4);
 | 
			
		||||
    strncpy(footer->creator_os, "Wi2k", 4);
 | 
			
		||||
 | 
			
		||||
    footer->features = be32_to_cpu(0x02);
 | 
			
		||||
    footer->version = be32_to_cpu(0x00010000);
 | 
			
		||||
    footer->data_offset = be64_to_cpu(HEADER_SIZE);
 | 
			
		||||
    footer->timestamp = be32_to_cpu(time(NULL) - VHD_TIMESTAMP_BASE);
 | 
			
		||||
 | 
			
		||||
    // Version of Virtual PC 2007
 | 
			
		||||
    footer->major = be16_to_cpu(0x0005);
 | 
			
		||||
    footer->minor =be16_to_cpu(0x0003);
 | 
			
		||||
 | 
			
		||||
    footer->orig_size = be64_to_cpu(total_sectors * 512);
 | 
			
		||||
    footer->size = be64_to_cpu(total_sectors * 512);
 | 
			
		||||
 | 
			
		||||
    footer->cyls = be16_to_cpu(cyls);
 | 
			
		||||
    footer->heads = heads;
 | 
			
		||||
    footer->secs_per_cyl = secs_per_cyl;
 | 
			
		||||
 | 
			
		||||
    footer->type = be32_to_cpu(VHD_DYNAMIC);
 | 
			
		||||
 | 
			
		||||
    // TODO uuid is missing
 | 
			
		||||
 | 
			
		||||
    footer->checksum = be32_to_cpu(vpc_checksum(buf, HEADER_SIZE));
 | 
			
		||||
 | 
			
		||||
    // Write the footer (twice: at the beginning and at the end)
 | 
			
		||||
    block_size = 0x200000;
 | 
			
		||||
    num_bat_entries = (total_sectors + block_size / 512) / (block_size / 512);
 | 
			
		||||
 | 
			
		||||
    if (write(fd, buf, HEADER_SIZE) != HEADER_SIZE)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    if (lseek(fd, 1536 + ((num_bat_entries * 4 + 511) & ~511), SEEK_SET) < 0)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
    if (write(fd, buf, HEADER_SIZE) != HEADER_SIZE)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    // Write the initial BAT
 | 
			
		||||
    if (lseek(fd, 3 * 512, SEEK_SET) < 0)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    memset(buf, 0xFF, 512);
 | 
			
		||||
    for (i = 0; i < (num_bat_entries * 4 + 511) / 512; i++)
 | 
			
		||||
        if (write(fd, buf, 512) != 512)
 | 
			
		||||
            return -EIO;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    // Prepare the Dynamic Disk Header
 | 
			
		||||
    memset(buf, 0, 1024);
 | 
			
		||||
 | 
			
		||||
    strncpy(dyndisk_header->magic, "cxsparse", 8);
 | 
			
		||||
 | 
			
		||||
    dyndisk_header->data_offset = be64_to_cpu(0xFFFFFFFF);
 | 
			
		||||
    dyndisk_header->table_offset = be64_to_cpu(3 * 512);
 | 
			
		||||
    dyndisk_header->version = be32_to_cpu(0x00010000);
 | 
			
		||||
    dyndisk_header->block_size = be32_to_cpu(block_size);
 | 
			
		||||
    dyndisk_header->max_table_entries = be32_to_cpu(num_bat_entries);
 | 
			
		||||
 | 
			
		||||
    dyndisk_header->checksum = be32_to_cpu(vpc_checksum(buf, 1024));
 | 
			
		||||
 | 
			
		||||
    // Write the header
 | 
			
		||||
    if (lseek(fd, 512, SEEK_SET) < 0)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
    if (write(fd, buf, 1024) != 1024)
 | 
			
		||||
        return -EIO;
 | 
			
		||||
 | 
			
		||||
    close(fd);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void vpc_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVVPCState *s = bs->opaque;
 | 
			
		||||
    qemu_free(s->pagetable);
 | 
			
		||||
#ifdef CACHE
 | 
			
		||||
    qemu_free(s->pageentry_u8);
 | 
			
		||||
#endif
 | 
			
		||||
    bdrv_delete(s->hd);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriver bdrv_vpc = {
 | 
			
		||||
    "vpc",
 | 
			
		||||
    sizeof(BDRVVPCState),
 | 
			
		||||
    vpc_probe,
 | 
			
		||||
    vpc_open,
 | 
			
		||||
    vpc_read,
 | 
			
		||||
    vpc_write,
 | 
			
		||||
    vpc_close,
 | 
			
		||||
    vpc_create,
 | 
			
		||||
};
 | 
			
		||||
							
								
								
									
										2848
									
								
								block-vvfat.c
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										2848
									
								
								block-vvfat.c
									
									
									
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										172
									
								
								block.h
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										172
									
								
								block.h
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,172 @@
 | 
			
		||||
#ifndef BLOCK_H
 | 
			
		||||
#define BLOCK_H
 | 
			
		||||
 | 
			
		||||
#include "qemu-aio.h"
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
 | 
			
		||||
/* block.c */
 | 
			
		||||
typedef struct BlockDriver BlockDriver;
 | 
			
		||||
 | 
			
		||||
extern BlockDriver bdrv_raw;
 | 
			
		||||
extern BlockDriver bdrv_host_device;
 | 
			
		||||
extern BlockDriver bdrv_cow;
 | 
			
		||||
extern BlockDriver bdrv_qcow;
 | 
			
		||||
extern BlockDriver bdrv_vmdk;
 | 
			
		||||
extern BlockDriver bdrv_cloop;
 | 
			
		||||
extern BlockDriver bdrv_dmg;
 | 
			
		||||
extern BlockDriver bdrv_bochs;
 | 
			
		||||
extern BlockDriver bdrv_vpc;
 | 
			
		||||
extern BlockDriver bdrv_vvfat;
 | 
			
		||||
extern BlockDriver bdrv_qcow2;
 | 
			
		||||
extern BlockDriver bdrv_parallels;
 | 
			
		||||
extern BlockDriver bdrv_nbd;
 | 
			
		||||
 | 
			
		||||
typedef struct BlockDriverInfo {
 | 
			
		||||
    /* in bytes, 0 if irrelevant */
 | 
			
		||||
    int cluster_size;
 | 
			
		||||
    /* offset at which the VM state can be saved (0 if not possible) */
 | 
			
		||||
    int64_t vm_state_offset;
 | 
			
		||||
} BlockDriverInfo;
 | 
			
		||||
 | 
			
		||||
typedef struct QEMUSnapshotInfo {
 | 
			
		||||
    char id_str[128]; /* unique snapshot id */
 | 
			
		||||
    /* the following fields are informative. They are not needed for
 | 
			
		||||
       the consistency of the snapshot */
 | 
			
		||||
    char name[256]; /* user choosen name */
 | 
			
		||||
    uint32_t vm_state_size; /* VM state info size */
 | 
			
		||||
    uint32_t date_sec; /* UTC date of the snapshot */
 | 
			
		||||
    uint32_t date_nsec;
 | 
			
		||||
    uint64_t vm_clock_nsec; /* VM clock relative to boot */
 | 
			
		||||
} QEMUSnapshotInfo;
 | 
			
		||||
 | 
			
		||||
#define BDRV_O_RDONLY      0x0000
 | 
			
		||||
#define BDRV_O_RDWR        0x0002
 | 
			
		||||
#define BDRV_O_ACCESS      0x0003
 | 
			
		||||
#define BDRV_O_CREAT       0x0004 /* create an empty file */
 | 
			
		||||
#define BDRV_O_SNAPSHOT    0x0008 /* open the file read only and save writes in a snapshot */
 | 
			
		||||
#define BDRV_O_FILE        0x0010 /* open as a raw file (do not try to
 | 
			
		||||
                                     use a disk image format on top of
 | 
			
		||||
                                     it (default for
 | 
			
		||||
                                     bdrv_file_open()) */
 | 
			
		||||
#define BDRV_O_NOCACHE     0x0020 /* do not use the host page cache */
 | 
			
		||||
#define BDRV_O_CACHE_WB    0x0040 /* use write-back caching */
 | 
			
		||||
#define BDRV_O_CACHE_DEF   0x0080 /* use default caching */
 | 
			
		||||
 | 
			
		||||
#define BDRV_O_CACHE_MASK  (BDRV_O_NOCACHE | BDRV_O_CACHE_WB | BDRV_O_CACHE_DEF)
 | 
			
		||||
 | 
			
		||||
void bdrv_info(void);
 | 
			
		||||
void bdrv_info_stats(void);
 | 
			
		||||
 | 
			
		||||
void bdrv_init(void);
 | 
			
		||||
BlockDriver *bdrv_find_format(const char *format_name);
 | 
			
		||||
int bdrv_create(BlockDriver *drv,
 | 
			
		||||
                const char *filename, int64_t size_in_sectors,
 | 
			
		||||
                const char *backing_file, int flags);
 | 
			
		||||
BlockDriverState *bdrv_new(const char *device_name);
 | 
			
		||||
void bdrv_delete(BlockDriverState *bs);
 | 
			
		||||
int bdrv_file_open(BlockDriverState **pbs, const char *filename, int flags);
 | 
			
		||||
int bdrv_open(BlockDriverState *bs, const char *filename, int flags);
 | 
			
		||||
int bdrv_open2(BlockDriverState *bs, const char *filename, int flags,
 | 
			
		||||
               BlockDriver *drv);
 | 
			
		||||
void bdrv_close(BlockDriverState *bs);
 | 
			
		||||
int bdrv_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
              uint8_t *buf, int nb_sectors);
 | 
			
		||||
int bdrv_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
               const uint8_t *buf, int nb_sectors);
 | 
			
		||||
int bdrv_pread(BlockDriverState *bs, int64_t offset,
 | 
			
		||||
               void *buf, int count);
 | 
			
		||||
int bdrv_pwrite(BlockDriverState *bs, int64_t offset,
 | 
			
		||||
                const void *buf, int count);
 | 
			
		||||
int bdrv_truncate(BlockDriverState *bs, int64_t offset);
 | 
			
		||||
int64_t bdrv_getlength(BlockDriverState *bs);
 | 
			
		||||
void bdrv_get_geometry(BlockDriverState *bs, uint64_t *nb_sectors_ptr);
 | 
			
		||||
void bdrv_guess_geometry(BlockDriverState *bs, int *pcyls, int *pheads, int *psecs);
 | 
			
		||||
int bdrv_commit(BlockDriverState *bs);
 | 
			
		||||
/* async block I/O */
 | 
			
		||||
typedef struct BlockDriverAIOCB BlockDriverAIOCB;
 | 
			
		||||
typedef void BlockDriverCompletionFunc(void *opaque, int ret);
 | 
			
		||||
 | 
			
		||||
BlockDriverAIOCB *bdrv_aio_readv(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                 QEMUIOVector *iov, int nb_sectors,
 | 
			
		||||
                                 BlockDriverCompletionFunc *cb, void *opaque);
 | 
			
		||||
BlockDriverAIOCB *bdrv_aio_writev(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                  QEMUIOVector *iov, int nb_sectors,
 | 
			
		||||
                                  BlockDriverCompletionFunc *cb, void *opaque);
 | 
			
		||||
 | 
			
		||||
BlockDriverAIOCB *bdrv_aio_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                uint8_t *buf, int nb_sectors,
 | 
			
		||||
                                BlockDriverCompletionFunc *cb, void *opaque);
 | 
			
		||||
BlockDriverAIOCB *bdrv_aio_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                 const uint8_t *buf, int nb_sectors,
 | 
			
		||||
                                 BlockDriverCompletionFunc *cb, void *opaque);
 | 
			
		||||
void bdrv_aio_cancel(BlockDriverAIOCB *acb);
 | 
			
		||||
 | 
			
		||||
/* Ensure contents are flushed to disk.  */
 | 
			
		||||
void bdrv_flush(BlockDriverState *bs);
 | 
			
		||||
void bdrv_flush_all(void);
 | 
			
		||||
 | 
			
		||||
int bdrv_is_allocated(BlockDriverState *bs, int64_t sector_num, int nb_sectors,
 | 
			
		||||
	int *pnum);
 | 
			
		||||
 | 
			
		||||
#define BDRV_TYPE_HD     0
 | 
			
		||||
#define BDRV_TYPE_CDROM  1
 | 
			
		||||
#define BDRV_TYPE_FLOPPY 2
 | 
			
		||||
#define BIOS_ATA_TRANSLATION_AUTO   0
 | 
			
		||||
#define BIOS_ATA_TRANSLATION_NONE   1
 | 
			
		||||
#define BIOS_ATA_TRANSLATION_LBA    2
 | 
			
		||||
#define BIOS_ATA_TRANSLATION_LARGE  3
 | 
			
		||||
#define BIOS_ATA_TRANSLATION_RECHS  4
 | 
			
		||||
 | 
			
		||||
void bdrv_set_geometry_hint(BlockDriverState *bs,
 | 
			
		||||
                            int cyls, int heads, int secs);
 | 
			
		||||
void bdrv_set_type_hint(BlockDriverState *bs, int type);
 | 
			
		||||
void bdrv_set_translation_hint(BlockDriverState *bs, int translation);
 | 
			
		||||
void bdrv_get_geometry_hint(BlockDriverState *bs,
 | 
			
		||||
                            int *pcyls, int *pheads, int *psecs);
 | 
			
		||||
int bdrv_get_type_hint(BlockDriverState *bs);
 | 
			
		||||
int bdrv_get_translation_hint(BlockDriverState *bs);
 | 
			
		||||
int bdrv_is_removable(BlockDriverState *bs);
 | 
			
		||||
int bdrv_is_read_only(BlockDriverState *bs);
 | 
			
		||||
int bdrv_is_sg(BlockDriverState *bs);
 | 
			
		||||
int bdrv_is_inserted(BlockDriverState *bs);
 | 
			
		||||
int bdrv_media_changed(BlockDriverState *bs);
 | 
			
		||||
int bdrv_is_locked(BlockDriverState *bs);
 | 
			
		||||
void bdrv_set_locked(BlockDriverState *bs, int locked);
 | 
			
		||||
void bdrv_eject(BlockDriverState *bs, int eject_flag);
 | 
			
		||||
void bdrv_set_change_cb(BlockDriverState *bs,
 | 
			
		||||
                        void (*change_cb)(void *opaque), void *opaque);
 | 
			
		||||
void bdrv_get_format(BlockDriverState *bs, char *buf, int buf_size);
 | 
			
		||||
BlockDriverState *bdrv_find(const char *name);
 | 
			
		||||
void bdrv_iterate(void (*it)(void *opaque, BlockDriverState *bs),
 | 
			
		||||
                  void *opaque);
 | 
			
		||||
int bdrv_is_encrypted(BlockDriverState *bs);
 | 
			
		||||
int bdrv_key_required(BlockDriverState *bs);
 | 
			
		||||
int bdrv_set_key(BlockDriverState *bs, const char *key);
 | 
			
		||||
int bdrv_query_missing_keys(void);
 | 
			
		||||
void bdrv_iterate_format(void (*it)(void *opaque, const char *name),
 | 
			
		||||
                         void *opaque);
 | 
			
		||||
const char *bdrv_get_device_name(BlockDriverState *bs);
 | 
			
		||||
int bdrv_write_compressed(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                          const uint8_t *buf, int nb_sectors);
 | 
			
		||||
int bdrv_get_info(BlockDriverState *bs, BlockDriverInfo *bdi);
 | 
			
		||||
 | 
			
		||||
const char *bdrv_get_encrypted_filename(BlockDriverState *bs);
 | 
			
		||||
void bdrv_get_backing_filename(BlockDriverState *bs,
 | 
			
		||||
                               char *filename, int filename_size);
 | 
			
		||||
int bdrv_snapshot_create(BlockDriverState *bs,
 | 
			
		||||
                         QEMUSnapshotInfo *sn_info);
 | 
			
		||||
int bdrv_snapshot_goto(BlockDriverState *bs,
 | 
			
		||||
                       const char *snapshot_id);
 | 
			
		||||
int bdrv_snapshot_delete(BlockDriverState *bs, const char *snapshot_id);
 | 
			
		||||
int bdrv_snapshot_list(BlockDriverState *bs,
 | 
			
		||||
                       QEMUSnapshotInfo **psn_info);
 | 
			
		||||
char *bdrv_snapshot_dump(char *buf, int buf_size, QEMUSnapshotInfo *sn);
 | 
			
		||||
int bdrv_ioctl(BlockDriverState *bs, unsigned long int req, void *buf);
 | 
			
		||||
 | 
			
		||||
char *get_human_readable_size(char *buf, int buf_size, int64_t size);
 | 
			
		||||
int path_is_absolute(const char *path);
 | 
			
		||||
void path_combine(char *dest, int dest_size,
 | 
			
		||||
                  const char *base_path,
 | 
			
		||||
                  const char *filename);
 | 
			
		||||
 | 
			
		||||
#endif
 | 
			
		||||
@@ -1,39 +0,0 @@
 | 
			
		||||
block-obj-y += raw_bsd.o cow.o qcow.o vdi.o vmdk.o cloop.o dmg.o bochs.o vpc.o vvfat.o
 | 
			
		||||
block-obj-y += qcow2.o qcow2-refcount.o qcow2-cluster.o qcow2-snapshot.o qcow2-cache.o
 | 
			
		||||
block-obj-y += qed.o qed-gencb.o qed-l2-cache.o qed-table.o qed-cluster.o
 | 
			
		||||
block-obj-y += qed-check.o
 | 
			
		||||
block-obj-$(CONFIG_VHDX) += vhdx.o vhdx-endian.o vhdx-log.o
 | 
			
		||||
block-obj-$(CONFIG_QUORUM) += quorum.o
 | 
			
		||||
block-obj-y += parallels.o blkdebug.o blkverify.o
 | 
			
		||||
block-obj-y += snapshot.o qapi.o
 | 
			
		||||
block-obj-$(CONFIG_WIN32) += raw-win32.o win32-aio.o
 | 
			
		||||
block-obj-$(CONFIG_POSIX) += raw-posix.o
 | 
			
		||||
block-obj-$(CONFIG_LINUX_AIO) += linux-aio.o
 | 
			
		||||
 | 
			
		||||
ifeq ($(CONFIG_POSIX),y)
 | 
			
		||||
block-obj-y += nbd.o nbd-client.o sheepdog.o
 | 
			
		||||
block-obj-$(CONFIG_LIBISCSI) += iscsi.o
 | 
			
		||||
block-obj-$(CONFIG_LIBNFS) += nfs.o
 | 
			
		||||
block-obj-$(CONFIG_CURL) += curl.o
 | 
			
		||||
block-obj-$(CONFIG_RBD) += rbd.o
 | 
			
		||||
block-obj-$(CONFIG_GLUSTERFS) += gluster.o
 | 
			
		||||
block-obj-$(CONFIG_LIBSSH2) += ssh.o
 | 
			
		||||
endif
 | 
			
		||||
 | 
			
		||||
common-obj-y += stream.o
 | 
			
		||||
common-obj-y += commit.o
 | 
			
		||||
common-obj-y += mirror.o
 | 
			
		||||
common-obj-y += backup.o
 | 
			
		||||
 | 
			
		||||
iscsi.o-cflags     := $(LIBISCSI_CFLAGS)
 | 
			
		||||
iscsi.o-libs       := $(LIBISCSI_LIBS)
 | 
			
		||||
curl.o-cflags      := $(CURL_CFLAGS)
 | 
			
		||||
curl.o-libs        := $(CURL_LIBS)
 | 
			
		||||
rbd.o-cflags       := $(RBD_CFLAGS)
 | 
			
		||||
rbd.o-libs         := $(RBD_LIBS)
 | 
			
		||||
gluster.o-cflags   := $(GLUSTERFS_CFLAGS)
 | 
			
		||||
gluster.o-libs     := $(GLUSTERFS_LIBS)
 | 
			
		||||
ssh.o-cflags       := $(LIBSSH2_CFLAGS)
 | 
			
		||||
ssh.o-libs         := $(LIBSSH2_LIBS)
 | 
			
		||||
qcow.o-libs        := -lz
 | 
			
		||||
linux-aio.o-libs   := -laio
 | 
			
		||||
							
								
								
									
										392
									
								
								block/backup.c
									
									
									
									
									
								
							
							
						
						
									
										392
									
								
								block/backup.c
									
									
									
									
									
								
							@@ -1,392 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU backup
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2013 Proxmox Server Solutions
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Dietmar Maurer (dietmar@proxmox.com)
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include <stdio.h>
 | 
			
		||||
#include <errno.h>
 | 
			
		||||
#include <unistd.h>
 | 
			
		||||
 | 
			
		||||
#include "trace.h"
 | 
			
		||||
#include "block/block.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "block/blockjob.h"
 | 
			
		||||
#include "qemu/ratelimit.h"
 | 
			
		||||
 | 
			
		||||
#define BACKUP_CLUSTER_BITS 16
 | 
			
		||||
#define BACKUP_CLUSTER_SIZE (1 << BACKUP_CLUSTER_BITS)
 | 
			
		||||
#define BACKUP_SECTORS_PER_CLUSTER (BACKUP_CLUSTER_SIZE / BDRV_SECTOR_SIZE)
 | 
			
		||||
 | 
			
		||||
#define SLICE_TIME 100000000ULL /* ns */
 | 
			
		||||
 | 
			
		||||
typedef struct CowRequest {
 | 
			
		||||
    int64_t start;
 | 
			
		||||
    int64_t end;
 | 
			
		||||
    QLIST_ENTRY(CowRequest) list;
 | 
			
		||||
    CoQueue wait_queue; /* coroutines blocked on this request */
 | 
			
		||||
} CowRequest;
 | 
			
		||||
 | 
			
		||||
typedef struct BackupBlockJob {
 | 
			
		||||
    BlockJob common;
 | 
			
		||||
    BlockDriverState *target;
 | 
			
		||||
    MirrorSyncMode sync_mode;
 | 
			
		||||
    RateLimit limit;
 | 
			
		||||
    BlockdevOnError on_source_error;
 | 
			
		||||
    BlockdevOnError on_target_error;
 | 
			
		||||
    CoRwlock flush_rwlock;
 | 
			
		||||
    uint64_t sectors_read;
 | 
			
		||||
    HBitmap *bitmap;
 | 
			
		||||
    QLIST_HEAD(, CowRequest) inflight_reqs;
 | 
			
		||||
} BackupBlockJob;
 | 
			
		||||
 | 
			
		||||
/* See if in-flight requests overlap and wait for them to complete */
 | 
			
		||||
static void coroutine_fn wait_for_overlapping_requests(BackupBlockJob *job,
 | 
			
		||||
                                                       int64_t start,
 | 
			
		||||
                                                       int64_t end)
 | 
			
		||||
{
 | 
			
		||||
    CowRequest *req;
 | 
			
		||||
    bool retry;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        retry = false;
 | 
			
		||||
        QLIST_FOREACH(req, &job->inflight_reqs, list) {
 | 
			
		||||
            if (end > req->start && start < req->end) {
 | 
			
		||||
                qemu_co_queue_wait(&req->wait_queue);
 | 
			
		||||
                retry = true;
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    } while (retry);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Keep track of an in-flight request */
 | 
			
		||||
static void cow_request_begin(CowRequest *req, BackupBlockJob *job,
 | 
			
		||||
                                     int64_t start, int64_t end)
 | 
			
		||||
{
 | 
			
		||||
    req->start = start;
 | 
			
		||||
    req->end = end;
 | 
			
		||||
    qemu_co_queue_init(&req->wait_queue);
 | 
			
		||||
    QLIST_INSERT_HEAD(&job->inflight_reqs, req, list);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Forget about a completed request */
 | 
			
		||||
static void cow_request_end(CowRequest *req)
 | 
			
		||||
{
 | 
			
		||||
    QLIST_REMOVE(req, list);
 | 
			
		||||
    qemu_co_queue_restart_all(&req->wait_queue);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn backup_do_cow(BlockDriverState *bs,
 | 
			
		||||
                                      int64_t sector_num, int nb_sectors,
 | 
			
		||||
                                      bool *error_is_read)
 | 
			
		||||
{
 | 
			
		||||
    BackupBlockJob *job = (BackupBlockJob *)bs->job;
 | 
			
		||||
    CowRequest cow_request;
 | 
			
		||||
    struct iovec iov;
 | 
			
		||||
    QEMUIOVector bounce_qiov;
 | 
			
		||||
    void *bounce_buffer = NULL;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    int64_t start, end;
 | 
			
		||||
    int n;
 | 
			
		||||
 | 
			
		||||
    qemu_co_rwlock_rdlock(&job->flush_rwlock);
 | 
			
		||||
 | 
			
		||||
    start = sector_num / BACKUP_SECTORS_PER_CLUSTER;
 | 
			
		||||
    end = DIV_ROUND_UP(sector_num + nb_sectors, BACKUP_SECTORS_PER_CLUSTER);
 | 
			
		||||
 | 
			
		||||
    trace_backup_do_cow_enter(job, start, sector_num, nb_sectors);
 | 
			
		||||
 | 
			
		||||
    wait_for_overlapping_requests(job, start, end);
 | 
			
		||||
    cow_request_begin(&cow_request, job, start, end);
 | 
			
		||||
 | 
			
		||||
    for (; start < end; start++) {
 | 
			
		||||
        if (hbitmap_get(job->bitmap, start)) {
 | 
			
		||||
            trace_backup_do_cow_skip(job, start);
 | 
			
		||||
            continue; /* already copied */
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        trace_backup_do_cow_process(job, start);
 | 
			
		||||
 | 
			
		||||
        n = MIN(BACKUP_SECTORS_PER_CLUSTER,
 | 
			
		||||
                job->common.len / BDRV_SECTOR_SIZE -
 | 
			
		||||
                start * BACKUP_SECTORS_PER_CLUSTER);
 | 
			
		||||
 | 
			
		||||
        if (!bounce_buffer) {
 | 
			
		||||
            bounce_buffer = qemu_blockalign(bs, BACKUP_CLUSTER_SIZE);
 | 
			
		||||
        }
 | 
			
		||||
        iov.iov_base = bounce_buffer;
 | 
			
		||||
        iov.iov_len = n * BDRV_SECTOR_SIZE;
 | 
			
		||||
        qemu_iovec_init_external(&bounce_qiov, &iov, 1);
 | 
			
		||||
 | 
			
		||||
        ret = bdrv_co_readv(bs, start * BACKUP_SECTORS_PER_CLUSTER, n,
 | 
			
		||||
                            &bounce_qiov);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            trace_backup_do_cow_read_fail(job, start, ret);
 | 
			
		||||
            if (error_is_read) {
 | 
			
		||||
                *error_is_read = true;
 | 
			
		||||
            }
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (buffer_is_zero(iov.iov_base, iov.iov_len)) {
 | 
			
		||||
            ret = bdrv_co_write_zeroes(job->target,
 | 
			
		||||
                                       start * BACKUP_SECTORS_PER_CLUSTER,
 | 
			
		||||
                                       n, BDRV_REQ_MAY_UNMAP);
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = bdrv_co_writev(job->target,
 | 
			
		||||
                                 start * BACKUP_SECTORS_PER_CLUSTER, n,
 | 
			
		||||
                                 &bounce_qiov);
 | 
			
		||||
        }
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            trace_backup_do_cow_write_fail(job, start, ret);
 | 
			
		||||
            if (error_is_read) {
 | 
			
		||||
                *error_is_read = false;
 | 
			
		||||
            }
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        hbitmap_set(job->bitmap, start, 1);
 | 
			
		||||
 | 
			
		||||
        /* Publish progress, guest I/O counts as progress too.  Note that the
 | 
			
		||||
         * offset field is an opaque progress value, it is not a disk offset.
 | 
			
		||||
         */
 | 
			
		||||
        job->sectors_read += n;
 | 
			
		||||
        job->common.offset += n * BDRV_SECTOR_SIZE;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    if (bounce_buffer) {
 | 
			
		||||
        qemu_vfree(bounce_buffer);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    cow_request_end(&cow_request);
 | 
			
		||||
 | 
			
		||||
    trace_backup_do_cow_return(job, sector_num, nb_sectors, ret);
 | 
			
		||||
 | 
			
		||||
    qemu_co_rwlock_unlock(&job->flush_rwlock);
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn backup_before_write_notify(
 | 
			
		||||
        NotifierWithReturn *notifier,
 | 
			
		||||
        void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BdrvTrackedRequest *req = opaque;
 | 
			
		||||
    int64_t sector_num = req->offset >> BDRV_SECTOR_BITS;
 | 
			
		||||
    int nb_sectors = req->bytes >> BDRV_SECTOR_BITS;
 | 
			
		||||
 | 
			
		||||
    assert((req->offset & (BDRV_SECTOR_SIZE - 1)) == 0);
 | 
			
		||||
    assert((req->bytes & (BDRV_SECTOR_SIZE - 1)) == 0);
 | 
			
		||||
 | 
			
		||||
    return backup_do_cow(req->bs, sector_num, nb_sectors, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void backup_set_speed(BlockJob *job, int64_t speed, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BackupBlockJob *s = container_of(job, BackupBlockJob, common);
 | 
			
		||||
 | 
			
		||||
    if (speed < 0) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER, "speed");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    ratelimit_set_speed(&s->limit, speed / BDRV_SECTOR_SIZE, SLICE_TIME);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void backup_iostatus_reset(BlockJob *job)
 | 
			
		||||
{
 | 
			
		||||
    BackupBlockJob *s = container_of(job, BackupBlockJob, common);
 | 
			
		||||
 | 
			
		||||
    bdrv_iostatus_reset(s->target);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const BlockJobDriver backup_job_driver = {
 | 
			
		||||
    .instance_size  = sizeof(BackupBlockJob),
 | 
			
		||||
    .job_type       = BLOCK_JOB_TYPE_BACKUP,
 | 
			
		||||
    .set_speed      = backup_set_speed,
 | 
			
		||||
    .iostatus_reset = backup_iostatus_reset,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockErrorAction backup_error_action(BackupBlockJob *job,
 | 
			
		||||
                                            bool read, int error)
 | 
			
		||||
{
 | 
			
		||||
    if (read) {
 | 
			
		||||
        return block_job_error_action(&job->common, job->common.bs,
 | 
			
		||||
                                      job->on_source_error, true, error);
 | 
			
		||||
    } else {
 | 
			
		||||
        return block_job_error_action(&job->common, job->target,
 | 
			
		||||
                                      job->on_target_error, false, error);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void coroutine_fn backup_run(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BackupBlockJob *job = opaque;
 | 
			
		||||
    BlockDriverState *bs = job->common.bs;
 | 
			
		||||
    BlockDriverState *target = job->target;
 | 
			
		||||
    BlockdevOnError on_target_error = job->on_target_error;
 | 
			
		||||
    NotifierWithReturn before_write = {
 | 
			
		||||
        .notify = backup_before_write_notify,
 | 
			
		||||
    };
 | 
			
		||||
    int64_t start, end;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
 | 
			
		||||
    QLIST_INIT(&job->inflight_reqs);
 | 
			
		||||
    qemu_co_rwlock_init(&job->flush_rwlock);
 | 
			
		||||
 | 
			
		||||
    start = 0;
 | 
			
		||||
    end = DIV_ROUND_UP(job->common.len / BDRV_SECTOR_SIZE,
 | 
			
		||||
                       BACKUP_SECTORS_PER_CLUSTER);
 | 
			
		||||
 | 
			
		||||
    job->bitmap = hbitmap_alloc(end, 0);
 | 
			
		||||
 | 
			
		||||
    bdrv_set_enable_write_cache(target, true);
 | 
			
		||||
    bdrv_set_on_error(target, on_target_error, on_target_error);
 | 
			
		||||
    bdrv_iostatus_enable(target);
 | 
			
		||||
 | 
			
		||||
    bdrv_add_before_write_notifier(bs, &before_write);
 | 
			
		||||
 | 
			
		||||
    if (job->sync_mode == MIRROR_SYNC_MODE_NONE) {
 | 
			
		||||
        while (!block_job_is_cancelled(&job->common)) {
 | 
			
		||||
            /* Yield until the job is cancelled.  We just let our before_write
 | 
			
		||||
             * notify callback service CoW requests. */
 | 
			
		||||
            job->common.busy = false;
 | 
			
		||||
            qemu_coroutine_yield();
 | 
			
		||||
            job->common.busy = true;
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        /* Both FULL and TOP SYNC_MODE's require copying.. */
 | 
			
		||||
        for (; start < end; start++) {
 | 
			
		||||
            bool error_is_read;
 | 
			
		||||
 | 
			
		||||
            if (block_job_is_cancelled(&job->common)) {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            /* we need to yield so that qemu_aio_flush() returns.
 | 
			
		||||
             * (without, VM does not reboot)
 | 
			
		||||
             */
 | 
			
		||||
            if (job->common.speed) {
 | 
			
		||||
                uint64_t delay_ns = ratelimit_calculate_delay(
 | 
			
		||||
                        &job->limit, job->sectors_read);
 | 
			
		||||
                job->sectors_read = 0;
 | 
			
		||||
                block_job_sleep_ns(&job->common, QEMU_CLOCK_REALTIME, delay_ns);
 | 
			
		||||
            } else {
 | 
			
		||||
                block_job_sleep_ns(&job->common, QEMU_CLOCK_REALTIME, 0);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (block_job_is_cancelled(&job->common)) {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (job->sync_mode == MIRROR_SYNC_MODE_TOP) {
 | 
			
		||||
                int i, n;
 | 
			
		||||
                int alloced = 0;
 | 
			
		||||
 | 
			
		||||
                /* Check to see if these blocks are already in the
 | 
			
		||||
                 * backing file. */
 | 
			
		||||
 | 
			
		||||
                for (i = 0; i < BACKUP_SECTORS_PER_CLUSTER;) {
 | 
			
		||||
                    /* bdrv_is_allocated() only returns true/false based
 | 
			
		||||
                     * on the first set of sectors it comes across that
 | 
			
		||||
                     * are are all in the same state.
 | 
			
		||||
                     * For that reason we must verify each sector in the
 | 
			
		||||
                     * backup cluster length.  We end up copying more than
 | 
			
		||||
                     * needed but at some point that is always the case. */
 | 
			
		||||
                    alloced =
 | 
			
		||||
                        bdrv_is_allocated(bs,
 | 
			
		||||
                                start * BACKUP_SECTORS_PER_CLUSTER + i,
 | 
			
		||||
                                BACKUP_SECTORS_PER_CLUSTER - i, &n);
 | 
			
		||||
                    i += n;
 | 
			
		||||
 | 
			
		||||
                    if (alloced == 1 || n == 0) {
 | 
			
		||||
                        break;
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
 | 
			
		||||
                /* If the above loop never found any sectors that are in
 | 
			
		||||
                 * the topmost image, skip this backup. */
 | 
			
		||||
                if (alloced == 0) {
 | 
			
		||||
                    continue;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
            /* FULL sync mode we copy the whole drive. */
 | 
			
		||||
            ret = backup_do_cow(bs, start * BACKUP_SECTORS_PER_CLUSTER,
 | 
			
		||||
                    BACKUP_SECTORS_PER_CLUSTER, &error_is_read);
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                /* Depending on error action, fail now or retry cluster */
 | 
			
		||||
                BlockErrorAction action =
 | 
			
		||||
                    backup_error_action(job, error_is_read, -ret);
 | 
			
		||||
                if (action == BLOCK_ERROR_ACTION_REPORT) {
 | 
			
		||||
                    break;
 | 
			
		||||
                } else {
 | 
			
		||||
                    start--;
 | 
			
		||||
                    continue;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    notifier_with_return_remove(&before_write);
 | 
			
		||||
 | 
			
		||||
    /* wait until pending backup_do_cow() calls have completed */
 | 
			
		||||
    qemu_co_rwlock_wrlock(&job->flush_rwlock);
 | 
			
		||||
    qemu_co_rwlock_unlock(&job->flush_rwlock);
 | 
			
		||||
 | 
			
		||||
    hbitmap_free(job->bitmap);
 | 
			
		||||
 | 
			
		||||
    bdrv_iostatus_disable(target);
 | 
			
		||||
    bdrv_unref(target);
 | 
			
		||||
 | 
			
		||||
    block_job_completed(&job->common, ret);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void backup_start(BlockDriverState *bs, BlockDriverState *target,
 | 
			
		||||
                  int64_t speed, MirrorSyncMode sync_mode,
 | 
			
		||||
                  BlockdevOnError on_source_error,
 | 
			
		||||
                  BlockdevOnError on_target_error,
 | 
			
		||||
                  BlockDriverCompletionFunc *cb, void *opaque,
 | 
			
		||||
                  Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int64_t len;
 | 
			
		||||
 | 
			
		||||
    assert(bs);
 | 
			
		||||
    assert(target);
 | 
			
		||||
    assert(cb);
 | 
			
		||||
 | 
			
		||||
    if ((on_source_error == BLOCKDEV_ON_ERROR_STOP ||
 | 
			
		||||
         on_source_error == BLOCKDEV_ON_ERROR_ENOSPC) &&
 | 
			
		||||
        !bdrv_iostatus_is_enabled(bs)) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER, "on-source-error");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    len = bdrv_getlength(bs);
 | 
			
		||||
    if (len < 0) {
 | 
			
		||||
        error_setg_errno(errp, -len, "unable to get length for '%s'",
 | 
			
		||||
                         bdrv_get_device_name(bs));
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    BackupBlockJob *job = block_job_create(&backup_job_driver, bs, speed,
 | 
			
		||||
                                           cb, opaque, errp);
 | 
			
		||||
    if (!job) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    job->on_source_error = on_source_error;
 | 
			
		||||
    job->on_target_error = on_target_error;
 | 
			
		||||
    job->target = target;
 | 
			
		||||
    job->sync_mode = sync_mode;
 | 
			
		||||
    job->common.len = len;
 | 
			
		||||
    job->common.co = qemu_coroutine_create(backup_run);
 | 
			
		||||
    qemu_coroutine_enter(job->common.co, job);
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										720
									
								
								block/blkdebug.c
									
									
									
									
									
								
							
							
						
						
									
										720
									
								
								block/blkdebug.c
									
									
									
									
									
								
							@@ -1,720 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block protocol for I/O error injection
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2010 Kevin Wolf <kwolf@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "qemu/config-file.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVBlkdebugState {
 | 
			
		||||
    int state;
 | 
			
		||||
    int new_state;
 | 
			
		||||
 | 
			
		||||
    QLIST_HEAD(, BlkdebugRule) rules[BLKDBG_EVENT_MAX];
 | 
			
		||||
    QSIMPLEQ_HEAD(, BlkdebugRule) active_rules;
 | 
			
		||||
    QLIST_HEAD(, BlkdebugSuspendedReq) suspended_reqs;
 | 
			
		||||
} BDRVBlkdebugState;
 | 
			
		||||
 | 
			
		||||
typedef struct BlkdebugAIOCB {
 | 
			
		||||
    BlockDriverAIOCB common;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
    int ret;
 | 
			
		||||
} BlkdebugAIOCB;
 | 
			
		||||
 | 
			
		||||
typedef struct BlkdebugSuspendedReq {
 | 
			
		||||
    Coroutine *co;
 | 
			
		||||
    char *tag;
 | 
			
		||||
    QLIST_ENTRY(BlkdebugSuspendedReq) next;
 | 
			
		||||
} BlkdebugSuspendedReq;
 | 
			
		||||
 | 
			
		||||
static void blkdebug_aio_cancel(BlockDriverAIOCB *blockacb);
 | 
			
		||||
 | 
			
		||||
static const AIOCBInfo blkdebug_aiocb_info = {
 | 
			
		||||
    .aiocb_size = sizeof(BlkdebugAIOCB),
 | 
			
		||||
    .cancel     = blkdebug_aio_cancel,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
enum {
 | 
			
		||||
    ACTION_INJECT_ERROR,
 | 
			
		||||
    ACTION_SET_STATE,
 | 
			
		||||
    ACTION_SUSPEND,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct BlkdebugRule {
 | 
			
		||||
    BlkDebugEvent event;
 | 
			
		||||
    int action;
 | 
			
		||||
    int state;
 | 
			
		||||
    union {
 | 
			
		||||
        struct {
 | 
			
		||||
            int error;
 | 
			
		||||
            int immediately;
 | 
			
		||||
            int once;
 | 
			
		||||
            int64_t sector;
 | 
			
		||||
        } inject;
 | 
			
		||||
        struct {
 | 
			
		||||
            int new_state;
 | 
			
		||||
        } set_state;
 | 
			
		||||
        struct {
 | 
			
		||||
            char *tag;
 | 
			
		||||
        } suspend;
 | 
			
		||||
    } options;
 | 
			
		||||
    QLIST_ENTRY(BlkdebugRule) next;
 | 
			
		||||
    QSIMPLEQ_ENTRY(BlkdebugRule) active_next;
 | 
			
		||||
} BlkdebugRule;
 | 
			
		||||
 | 
			
		||||
static QemuOptsList inject_error_opts = {
 | 
			
		||||
    .name = "inject-error",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(inject_error_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = "event",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "state",
 | 
			
		||||
            .type = QEMU_OPT_NUMBER,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "errno",
 | 
			
		||||
            .type = QEMU_OPT_NUMBER,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "sector",
 | 
			
		||||
            .type = QEMU_OPT_NUMBER,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "once",
 | 
			
		||||
            .type = QEMU_OPT_BOOL,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "immediately",
 | 
			
		||||
            .type = QEMU_OPT_BOOL,
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static QemuOptsList set_state_opts = {
 | 
			
		||||
    .name = "set-state",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(set_state_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = "event",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "state",
 | 
			
		||||
            .type = QEMU_OPT_NUMBER,
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "new_state",
 | 
			
		||||
            .type = QEMU_OPT_NUMBER,
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static QemuOptsList *config_groups[] = {
 | 
			
		||||
    &inject_error_opts,
 | 
			
		||||
    &set_state_opts,
 | 
			
		||||
    NULL
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static const char *event_names[BLKDBG_EVENT_MAX] = {
 | 
			
		||||
    [BLKDBG_L1_UPDATE]                      = "l1_update",
 | 
			
		||||
    [BLKDBG_L1_GROW_ALLOC_TABLE]            = "l1_grow.alloc_table",
 | 
			
		||||
    [BLKDBG_L1_GROW_WRITE_TABLE]            = "l1_grow.write_table",
 | 
			
		||||
    [BLKDBG_L1_GROW_ACTIVATE_TABLE]         = "l1_grow.activate_table",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_L2_LOAD]                        = "l2_load",
 | 
			
		||||
    [BLKDBG_L2_UPDATE]                      = "l2_update",
 | 
			
		||||
    [BLKDBG_L2_UPDATE_COMPRESSED]           = "l2_update_compressed",
 | 
			
		||||
    [BLKDBG_L2_ALLOC_COW_READ]              = "l2_alloc.cow_read",
 | 
			
		||||
    [BLKDBG_L2_ALLOC_WRITE]                 = "l2_alloc.write",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_READ_AIO]                       = "read_aio",
 | 
			
		||||
    [BLKDBG_READ_BACKING_AIO]               = "read_backing_aio",
 | 
			
		||||
    [BLKDBG_READ_COMPRESSED]                = "read_compressed",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_WRITE_AIO]                      = "write_aio",
 | 
			
		||||
    [BLKDBG_WRITE_COMPRESSED]               = "write_compressed",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_VMSTATE_LOAD]                   = "vmstate_load",
 | 
			
		||||
    [BLKDBG_VMSTATE_SAVE]                   = "vmstate_save",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_COW_READ]                       = "cow_read",
 | 
			
		||||
    [BLKDBG_COW_WRITE]                      = "cow_write",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_REFTABLE_LOAD]                  = "reftable_load",
 | 
			
		||||
    [BLKDBG_REFTABLE_GROW]                  = "reftable_grow",
 | 
			
		||||
    [BLKDBG_REFTABLE_UPDATE]                = "reftable_update",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_REFBLOCK_LOAD]                  = "refblock_load",
 | 
			
		||||
    [BLKDBG_REFBLOCK_UPDATE]                = "refblock_update",
 | 
			
		||||
    [BLKDBG_REFBLOCK_UPDATE_PART]           = "refblock_update_part",
 | 
			
		||||
    [BLKDBG_REFBLOCK_ALLOC]                 = "refblock_alloc",
 | 
			
		||||
    [BLKDBG_REFBLOCK_ALLOC_HOOKUP]          = "refblock_alloc.hookup",
 | 
			
		||||
    [BLKDBG_REFBLOCK_ALLOC_WRITE]           = "refblock_alloc.write",
 | 
			
		||||
    [BLKDBG_REFBLOCK_ALLOC_WRITE_BLOCKS]    = "refblock_alloc.write_blocks",
 | 
			
		||||
    [BLKDBG_REFBLOCK_ALLOC_WRITE_TABLE]     = "refblock_alloc.write_table",
 | 
			
		||||
    [BLKDBG_REFBLOCK_ALLOC_SWITCH_TABLE]    = "refblock_alloc.switch_table",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_CLUSTER_ALLOC]                  = "cluster_alloc",
 | 
			
		||||
    [BLKDBG_CLUSTER_ALLOC_BYTES]            = "cluster_alloc_bytes",
 | 
			
		||||
    [BLKDBG_CLUSTER_FREE]                   = "cluster_free",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_FLUSH_TO_OS]                    = "flush_to_os",
 | 
			
		||||
    [BLKDBG_FLUSH_TO_DISK]                  = "flush_to_disk",
 | 
			
		||||
 | 
			
		||||
    [BLKDBG_PWRITEV_RMW_HEAD]               = "pwritev_rmw.head",
 | 
			
		||||
    [BLKDBG_PWRITEV_RMW_AFTER_HEAD]         = "pwritev_rmw.after_head",
 | 
			
		||||
    [BLKDBG_PWRITEV_RMW_TAIL]               = "pwritev_rmw.tail",
 | 
			
		||||
    [BLKDBG_PWRITEV_RMW_AFTER_TAIL]         = "pwritev_rmw.after_tail",
 | 
			
		||||
    [BLKDBG_PWRITEV]                        = "pwritev",
 | 
			
		||||
    [BLKDBG_PWRITEV_ZERO]                   = "pwritev_zero",
 | 
			
		||||
    [BLKDBG_PWRITEV_DONE]                   = "pwritev_done",
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int get_event_by_name(const char *name, BlkDebugEvent *event)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < BLKDBG_EVENT_MAX; i++) {
 | 
			
		||||
        if (!strcmp(event_names[i], name)) {
 | 
			
		||||
            *event = i;
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
struct add_rule_data {
 | 
			
		||||
    BDRVBlkdebugState *s;
 | 
			
		||||
    int action;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int add_rule(QemuOpts *opts, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    struct add_rule_data *d = opaque;
 | 
			
		||||
    BDRVBlkdebugState *s = d->s;
 | 
			
		||||
    const char* event_name;
 | 
			
		||||
    BlkDebugEvent event;
 | 
			
		||||
    struct BlkdebugRule *rule;
 | 
			
		||||
 | 
			
		||||
    /* Find the right event for the rule */
 | 
			
		||||
    event_name = qemu_opt_get(opts, "event");
 | 
			
		||||
    if (!event_name || get_event_by_name(event_name, &event) < 0) {
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Set attributes common for all actions */
 | 
			
		||||
    rule = g_malloc0(sizeof(*rule));
 | 
			
		||||
    *rule = (struct BlkdebugRule) {
 | 
			
		||||
        .event  = event,
 | 
			
		||||
        .action = d->action,
 | 
			
		||||
        .state  = qemu_opt_get_number(opts, "state", 0),
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    /* Parse action-specific options */
 | 
			
		||||
    switch (d->action) {
 | 
			
		||||
    case ACTION_INJECT_ERROR:
 | 
			
		||||
        rule->options.inject.error = qemu_opt_get_number(opts, "errno", EIO);
 | 
			
		||||
        rule->options.inject.once  = qemu_opt_get_bool(opts, "once", 0);
 | 
			
		||||
        rule->options.inject.immediately =
 | 
			
		||||
            qemu_opt_get_bool(opts, "immediately", 0);
 | 
			
		||||
        rule->options.inject.sector = qemu_opt_get_number(opts, "sector", -1);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case ACTION_SET_STATE:
 | 
			
		||||
        rule->options.set_state.new_state =
 | 
			
		||||
            qemu_opt_get_number(opts, "new_state", 0);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case ACTION_SUSPEND:
 | 
			
		||||
        rule->options.suspend.tag =
 | 
			
		||||
            g_strdup(qemu_opt_get(opts, "tag"));
 | 
			
		||||
        break;
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    /* Add the rule */
 | 
			
		||||
    QLIST_INSERT_HEAD(&s->rules[event], rule, next);
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void remove_rule(BlkdebugRule *rule)
 | 
			
		||||
{
 | 
			
		||||
    switch (rule->action) {
 | 
			
		||||
    case ACTION_INJECT_ERROR:
 | 
			
		||||
    case ACTION_SET_STATE:
 | 
			
		||||
        break;
 | 
			
		||||
    case ACTION_SUSPEND:
 | 
			
		||||
        g_free(rule->options.suspend.tag);
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    QLIST_REMOVE(rule, next);
 | 
			
		||||
    g_free(rule);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int read_config(BDRVBlkdebugState *s, const char *filename,
 | 
			
		||||
                       QDict *options, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    FILE *f = NULL;
 | 
			
		||||
    int ret;
 | 
			
		||||
    struct add_rule_data d;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    if (filename) {
 | 
			
		||||
        f = fopen(filename, "r");
 | 
			
		||||
        if (f == NULL) {
 | 
			
		||||
            error_setg_errno(errp, errno, "Could not read blkdebug config file");
 | 
			
		||||
            return -errno;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        ret = qemu_config_parse(f, config_groups, filename);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            error_setg(errp, "Could not parse blkdebug config file");
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_config_parse_qdict(options, config_groups, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    d.s = s;
 | 
			
		||||
    d.action = ACTION_INJECT_ERROR;
 | 
			
		||||
    qemu_opts_foreach(&inject_error_opts, add_rule, &d, 0);
 | 
			
		||||
 | 
			
		||||
    d.action = ACTION_SET_STATE;
 | 
			
		||||
    qemu_opts_foreach(&set_state_opts, add_rule, &d, 0);
 | 
			
		||||
 | 
			
		||||
    ret = 0;
 | 
			
		||||
fail:
 | 
			
		||||
    qemu_opts_reset(&inject_error_opts);
 | 
			
		||||
    qemu_opts_reset(&set_state_opts);
 | 
			
		||||
    if (f) {
 | 
			
		||||
        fclose(f);
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Valid blkdebug filenames look like blkdebug:path/to/config:path/to/image */
 | 
			
		||||
static void blkdebug_parse_filename(const char *filename, QDict *options,
 | 
			
		||||
                                    Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    const char *c;
 | 
			
		||||
 | 
			
		||||
    /* Parse the blkdebug: prefix */
 | 
			
		||||
    if (!strstart(filename, "blkdebug:", &filename)) {
 | 
			
		||||
        /* There was no prefix; therefore, all options have to be already
 | 
			
		||||
           present in the QDict (except for the filename) */
 | 
			
		||||
        qdict_put(options, "x-image", qstring_from_str(filename));
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Parse config file path */
 | 
			
		||||
    c = strchr(filename, ':');
 | 
			
		||||
    if (c == NULL) {
 | 
			
		||||
        error_setg(errp, "blkdebug requires both config file and image path");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (c != filename) {
 | 
			
		||||
        QString *config_path;
 | 
			
		||||
        config_path = qstring_from_substr(filename, 0, c - filename - 1);
 | 
			
		||||
        qdict_put(options, "config", config_path);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* TODO Allow multi-level nesting and set file.filename here */
 | 
			
		||||
    filename = c + 1;
 | 
			
		||||
    qdict_put(options, "x-image", qstring_from_str(filename));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static QemuOptsList runtime_opts = {
 | 
			
		||||
    .name = "blkdebug",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = "config",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "Path to the configuration file",
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "x-image",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "[internal use only, will be removed]",
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "align",
 | 
			
		||||
            .type = QEMU_OPT_SIZE,
 | 
			
		||||
            .help = "Required alignment in bytes",
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int blkdebug_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                         Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    QemuOpts *opts;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    const char *config;
 | 
			
		||||
    uint64_t align;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
 | 
			
		||||
    qemu_opts_absorb_qdict(opts, options, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Read rules from config file or command line options */
 | 
			
		||||
    config = qemu_opt_get(opts, "config");
 | 
			
		||||
    ret = read_config(s, config, options, errp);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Set initial state */
 | 
			
		||||
    s->state = 1;
 | 
			
		||||
 | 
			
		||||
    /* Open the backing file */
 | 
			
		||||
    assert(bs->file == NULL);
 | 
			
		||||
    ret = bdrv_open_image(&bs->file, qemu_opt_get(opts, "x-image"), options, "image",
 | 
			
		||||
                          flags | BDRV_O_PROTOCOL, false, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Set request alignment */
 | 
			
		||||
    align = qemu_opt_get_size(opts, "align", bs->request_alignment);
 | 
			
		||||
    if (align > 0 && align < INT_MAX && !(align & (align - 1))) {
 | 
			
		||||
        bs->request_alignment = align;
 | 
			
		||||
    } else {
 | 
			
		||||
        error_setg(errp, "Invalid alignment");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail_unref;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = 0;
 | 
			
		||||
    goto out;
 | 
			
		||||
 | 
			
		||||
fail_unref:
 | 
			
		||||
    bdrv_unref(bs->file);
 | 
			
		||||
out:
 | 
			
		||||
    qemu_opts_del(opts);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void error_callback_bh(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    struct BlkdebugAIOCB *acb = opaque;
 | 
			
		||||
    qemu_bh_delete(acb->bh);
 | 
			
		||||
    acb->common.cb(acb->common.opaque, acb->ret);
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkdebug_aio_cancel(BlockDriverAIOCB *blockacb)
 | 
			
		||||
{
 | 
			
		||||
    BlkdebugAIOCB *acb = container_of(blockacb, BlkdebugAIOCB, common);
 | 
			
		||||
    if (acb->bh) {
 | 
			
		||||
        qemu_bh_delete(acb->bh);
 | 
			
		||||
        acb->bh = NULL;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *inject_error(BlockDriverState *bs,
 | 
			
		||||
    BlockDriverCompletionFunc *cb, void *opaque, BlkdebugRule *rule)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    int error = rule->options.inject.error;
 | 
			
		||||
    struct BlkdebugAIOCB *acb;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
 | 
			
		||||
    if (rule->options.inject.once) {
 | 
			
		||||
        QSIMPLEQ_INIT(&s->active_rules);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (rule->options.inject.immediately) {
 | 
			
		||||
        return NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    acb = qemu_aio_get(&blkdebug_aiocb_info, bs, cb, opaque);
 | 
			
		||||
    acb->ret = -error;
 | 
			
		||||
 | 
			
		||||
    bh = aio_bh_new(bdrv_get_aio_context(bs), error_callback_bh, acb);
 | 
			
		||||
    acb->bh = bh;
 | 
			
		||||
    qemu_bh_schedule(bh);
 | 
			
		||||
 | 
			
		||||
    return &acb->common;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *blkdebug_aio_readv(BlockDriverState *bs,
 | 
			
		||||
    int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
 | 
			
		||||
    BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugRule *rule = NULL;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(rule, &s->active_rules, active_next) {
 | 
			
		||||
        if (rule->options.inject.sector == -1 ||
 | 
			
		||||
            (rule->options.inject.sector >= sector_num &&
 | 
			
		||||
             rule->options.inject.sector < sector_num + nb_sectors)) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (rule && rule->options.inject.error) {
 | 
			
		||||
        return inject_error(bs, cb, opaque, rule);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return bdrv_aio_readv(bs->file, sector_num, qiov, nb_sectors, cb, opaque);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *blkdebug_aio_writev(BlockDriverState *bs,
 | 
			
		||||
    int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
 | 
			
		||||
    BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugRule *rule = NULL;
 | 
			
		||||
 | 
			
		||||
    QSIMPLEQ_FOREACH(rule, &s->active_rules, active_next) {
 | 
			
		||||
        if (rule->options.inject.sector == -1 ||
 | 
			
		||||
            (rule->options.inject.sector >= sector_num &&
 | 
			
		||||
             rule->options.inject.sector < sector_num + nb_sectors)) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (rule && rule->options.inject.error) {
 | 
			
		||||
        return inject_error(bs, cb, opaque, rule);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return bdrv_aio_writev(bs->file, sector_num, qiov, nb_sectors, cb, opaque);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static void blkdebug_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugRule *rule, *next;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < BLKDBG_EVENT_MAX; i++) {
 | 
			
		||||
        QLIST_FOREACH_SAFE(rule, &s->rules[i], next, next) {
 | 
			
		||||
            remove_rule(rule);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void suspend_request(BlockDriverState *bs, BlkdebugRule *rule)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugSuspendedReq r;
 | 
			
		||||
 | 
			
		||||
    r = (BlkdebugSuspendedReq) {
 | 
			
		||||
        .co         = qemu_coroutine_self(),
 | 
			
		||||
        .tag        = g_strdup(rule->options.suspend.tag),
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    remove_rule(rule);
 | 
			
		||||
    QLIST_INSERT_HEAD(&s->suspended_reqs, &r, next);
 | 
			
		||||
 | 
			
		||||
    printf("blkdebug: Suspended request '%s'\n", r.tag);
 | 
			
		||||
    qemu_coroutine_yield();
 | 
			
		||||
    printf("blkdebug: Resuming request '%s'\n", r.tag);
 | 
			
		||||
 | 
			
		||||
    QLIST_REMOVE(&r, next);
 | 
			
		||||
    g_free(r.tag);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool process_rule(BlockDriverState *bs, struct BlkdebugRule *rule,
 | 
			
		||||
    bool injected)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    /* Only process rules for the current state */
 | 
			
		||||
    if (rule->state && rule->state != s->state) {
 | 
			
		||||
        return injected;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Take the action */
 | 
			
		||||
    switch (rule->action) {
 | 
			
		||||
    case ACTION_INJECT_ERROR:
 | 
			
		||||
        if (!injected) {
 | 
			
		||||
            QSIMPLEQ_INIT(&s->active_rules);
 | 
			
		||||
            injected = true;
 | 
			
		||||
        }
 | 
			
		||||
        QSIMPLEQ_INSERT_HEAD(&s->active_rules, rule, active_next);
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case ACTION_SET_STATE:
 | 
			
		||||
        s->new_state = rule->options.set_state.new_state;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case ACTION_SUSPEND:
 | 
			
		||||
        suspend_request(bs, rule);
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
    return injected;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkdebug_debug_event(BlockDriverState *bs, BlkDebugEvent event)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    struct BlkdebugRule *rule, *next;
 | 
			
		||||
    bool injected;
 | 
			
		||||
 | 
			
		||||
    assert((int)event >= 0 && event < BLKDBG_EVENT_MAX);
 | 
			
		||||
 | 
			
		||||
    injected = false;
 | 
			
		||||
    s->new_state = s->state;
 | 
			
		||||
    QLIST_FOREACH_SAFE(rule, &s->rules[event], next, next) {
 | 
			
		||||
        injected = process_rule(bs, rule, injected);
 | 
			
		||||
    }
 | 
			
		||||
    s->state = s->new_state;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int blkdebug_debug_breakpoint(BlockDriverState *bs, const char *event,
 | 
			
		||||
                                     const char *tag)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    struct BlkdebugRule *rule;
 | 
			
		||||
    BlkDebugEvent blkdebug_event;
 | 
			
		||||
 | 
			
		||||
    if (get_event_by_name(event, &blkdebug_event) < 0) {
 | 
			
		||||
        return -ENOENT;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    rule = g_malloc(sizeof(*rule));
 | 
			
		||||
    *rule = (struct BlkdebugRule) {
 | 
			
		||||
        .event  = blkdebug_event,
 | 
			
		||||
        .action = ACTION_SUSPEND,
 | 
			
		||||
        .state  = 0,
 | 
			
		||||
        .options.suspend.tag = g_strdup(tag),
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    QLIST_INSERT_HEAD(&s->rules[blkdebug_event], rule, next);
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int blkdebug_debug_resume(BlockDriverState *bs, const char *tag)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugSuspendedReq *r, *next;
 | 
			
		||||
 | 
			
		||||
    QLIST_FOREACH_SAFE(r, &s->suspended_reqs, next, next) {
 | 
			
		||||
        if (!strcmp(r->tag, tag)) {
 | 
			
		||||
            qemu_coroutine_enter(r->co, NULL);
 | 
			
		||||
            return 0;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return -ENOENT;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int blkdebug_debug_remove_breakpoint(BlockDriverState *bs,
 | 
			
		||||
                                            const char *tag)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugSuspendedReq *r, *r_next;
 | 
			
		||||
    BlkdebugRule *rule, *next;
 | 
			
		||||
    int i, ret = -ENOENT;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < BLKDBG_EVENT_MAX; i++) {
 | 
			
		||||
        QLIST_FOREACH_SAFE(rule, &s->rules[i], next, next) {
 | 
			
		||||
            if (rule->action == ACTION_SUSPEND &&
 | 
			
		||||
                !strcmp(rule->options.suspend.tag, tag)) {
 | 
			
		||||
                remove_rule(rule);
 | 
			
		||||
                ret = 0;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    QLIST_FOREACH_SAFE(r, &s->suspended_reqs, next, r_next) {
 | 
			
		||||
        if (!strcmp(r->tag, tag)) {
 | 
			
		||||
            qemu_coroutine_enter(r->co, NULL);
 | 
			
		||||
            ret = 0;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool blkdebug_debug_is_suspended(BlockDriverState *bs, const char *tag)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkdebugState *s = bs->opaque;
 | 
			
		||||
    BlkdebugSuspendedReq *r;
 | 
			
		||||
 | 
			
		||||
    QLIST_FOREACH(r, &s->suspended_reqs, next) {
 | 
			
		||||
        if (!strcmp(r->tag, tag)) {
 | 
			
		||||
            return true;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return false;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t blkdebug_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    return bdrv_getlength(bs->file);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_blkdebug = {
 | 
			
		||||
    .format_name            = "blkdebug",
 | 
			
		||||
    .protocol_name          = "blkdebug",
 | 
			
		||||
    .instance_size          = sizeof(BDRVBlkdebugState),
 | 
			
		||||
 | 
			
		||||
    .bdrv_parse_filename    = blkdebug_parse_filename,
 | 
			
		||||
    .bdrv_file_open         = blkdebug_open,
 | 
			
		||||
    .bdrv_close             = blkdebug_close,
 | 
			
		||||
    .bdrv_getlength         = blkdebug_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv         = blkdebug_aio_readv,
 | 
			
		||||
    .bdrv_aio_writev        = blkdebug_aio_writev,
 | 
			
		||||
 | 
			
		||||
    .bdrv_debug_event           = blkdebug_debug_event,
 | 
			
		||||
    .bdrv_debug_breakpoint      = blkdebug_debug_breakpoint,
 | 
			
		||||
    .bdrv_debug_remove_breakpoint
 | 
			
		||||
                                = blkdebug_debug_remove_breakpoint,
 | 
			
		||||
    .bdrv_debug_resume          = blkdebug_debug_resume,
 | 
			
		||||
    .bdrv_debug_is_suspended    = blkdebug_debug_is_suspended,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_blkdebug_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_blkdebug);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_blkdebug_init);
 | 
			
		||||
@@ -1,349 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block protocol for block driver correctness testing
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2010 IBM, Corp.
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include <stdarg.h>
 | 
			
		||||
#include "qemu/sockets.h" /* for EINPROGRESS on Windows */
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    BlockDriverState *test_file;
 | 
			
		||||
} BDRVBlkverifyState;
 | 
			
		||||
 | 
			
		||||
typedef struct BlkverifyAIOCB BlkverifyAIOCB;
 | 
			
		||||
struct BlkverifyAIOCB {
 | 
			
		||||
    BlockDriverAIOCB common;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
 | 
			
		||||
    /* Request metadata */
 | 
			
		||||
    bool is_write;
 | 
			
		||||
    int64_t sector_num;
 | 
			
		||||
    int nb_sectors;
 | 
			
		||||
 | 
			
		||||
    int ret;                    /* first completed request's result */
 | 
			
		||||
    unsigned int done;          /* completion counter */
 | 
			
		||||
    bool *finished;             /* completion signal for cancel */
 | 
			
		||||
 | 
			
		||||
    QEMUIOVector *qiov;         /* user I/O vector */
 | 
			
		||||
    QEMUIOVector raw_qiov;      /* cloned I/O vector for raw file */
 | 
			
		||||
    void *buf;                  /* buffer for raw file I/O */
 | 
			
		||||
 | 
			
		||||
    void (*verify)(BlkverifyAIOCB *acb);
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void blkverify_aio_cancel(BlockDriverAIOCB *blockacb)
 | 
			
		||||
{
 | 
			
		||||
    BlkverifyAIOCB *acb = (BlkverifyAIOCB *)blockacb;
 | 
			
		||||
    AioContext *aio_context = bdrv_get_aio_context(blockacb->bs);
 | 
			
		||||
    bool finished = false;
 | 
			
		||||
 | 
			
		||||
    /* Wait until request completes, invokes its callback, and frees itself */
 | 
			
		||||
    acb->finished = &finished;
 | 
			
		||||
    while (!finished) {
 | 
			
		||||
        aio_poll(aio_context, true);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const AIOCBInfo blkverify_aiocb_info = {
 | 
			
		||||
    .aiocb_size         = sizeof(BlkverifyAIOCB),
 | 
			
		||||
    .cancel             = blkverify_aio_cancel,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void GCC_FMT_ATTR(2, 3) blkverify_err(BlkverifyAIOCB *acb,
 | 
			
		||||
                                             const char *fmt, ...)
 | 
			
		||||
{
 | 
			
		||||
    va_list ap;
 | 
			
		||||
 | 
			
		||||
    va_start(ap, fmt);
 | 
			
		||||
    fprintf(stderr, "blkverify: %s sector_num=%" PRId64 " nb_sectors=%d ",
 | 
			
		||||
            acb->is_write ? "write" : "read", acb->sector_num,
 | 
			
		||||
            acb->nb_sectors);
 | 
			
		||||
    vfprintf(stderr, fmt, ap);
 | 
			
		||||
    fprintf(stderr, "\n");
 | 
			
		||||
    va_end(ap);
 | 
			
		||||
    exit(1);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Valid blkverify filenames look like blkverify:path/to/raw_image:path/to/image */
 | 
			
		||||
static void blkverify_parse_filename(const char *filename, QDict *options,
 | 
			
		||||
                                     Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    const char *c;
 | 
			
		||||
    QString *raw_path;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    /* Parse the blkverify: prefix */
 | 
			
		||||
    if (!strstart(filename, "blkverify:", &filename)) {
 | 
			
		||||
        /* There was no prefix; therefore, all options have to be already
 | 
			
		||||
           present in the QDict (except for the filename) */
 | 
			
		||||
        qdict_put(options, "x-image", qstring_from_str(filename));
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Parse the raw image filename */
 | 
			
		||||
    c = strchr(filename, ':');
 | 
			
		||||
    if (c == NULL) {
 | 
			
		||||
        error_setg(errp, "blkverify requires raw copy and original image path");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* TODO Implement option pass-through and set raw.filename here */
 | 
			
		||||
    raw_path = qstring_from_substr(filename, 0, c - filename - 1);
 | 
			
		||||
    qdict_put(options, "x-raw", raw_path);
 | 
			
		||||
 | 
			
		||||
    /* TODO Allow multi-level nesting and set file.filename here */
 | 
			
		||||
    filename = c + 1;
 | 
			
		||||
    qdict_put(options, "x-image", qstring_from_str(filename));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static QemuOptsList runtime_opts = {
 | 
			
		||||
    .name = "blkverify",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = "x-raw",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "[internal use only, will be removed]",
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = "x-image",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "[internal use only, will be removed]",
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int blkverify_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                          Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
    QemuOpts *opts;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
 | 
			
		||||
    qemu_opts_absorb_qdict(opts, options, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Open the raw file */
 | 
			
		||||
    assert(bs->file == NULL);
 | 
			
		||||
    ret = bdrv_open_image(&bs->file, qemu_opt_get(opts, "x-raw"), options,
 | 
			
		||||
                          "raw", flags | BDRV_O_PROTOCOL, false, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Open the test file */
 | 
			
		||||
    assert(s->test_file == NULL);
 | 
			
		||||
    ret = bdrv_open_image(&s->test_file, qemu_opt_get(opts, "x-image"), options,
 | 
			
		||||
                          "test", flags, false, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        s->test_file = NULL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = 0;
 | 
			
		||||
fail:
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkverify_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    bdrv_unref(s->test_file);
 | 
			
		||||
    s->test_file = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t blkverify_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return bdrv_getlength(s->test_file);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlkverifyAIOCB *blkverify_aio_get(BlockDriverState *bs, bool is_write,
 | 
			
		||||
                                         int64_t sector_num, QEMUIOVector *qiov,
 | 
			
		||||
                                         int nb_sectors,
 | 
			
		||||
                                         BlockDriverCompletionFunc *cb,
 | 
			
		||||
                                         void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BlkverifyAIOCB *acb = qemu_aio_get(&blkverify_aiocb_info, bs, cb, opaque);
 | 
			
		||||
 | 
			
		||||
    acb->bh = NULL;
 | 
			
		||||
    acb->is_write = is_write;
 | 
			
		||||
    acb->sector_num = sector_num;
 | 
			
		||||
    acb->nb_sectors = nb_sectors;
 | 
			
		||||
    acb->ret = -EINPROGRESS;
 | 
			
		||||
    acb->done = 0;
 | 
			
		||||
    acb->qiov = qiov;
 | 
			
		||||
    acb->buf = NULL;
 | 
			
		||||
    acb->verify = NULL;
 | 
			
		||||
    acb->finished = NULL;
 | 
			
		||||
    return acb;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkverify_aio_bh(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BlkverifyAIOCB *acb = opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_bh_delete(acb->bh);
 | 
			
		||||
    if (acb->buf) {
 | 
			
		||||
        qemu_iovec_destroy(&acb->raw_qiov);
 | 
			
		||||
        qemu_vfree(acb->buf);
 | 
			
		||||
    }
 | 
			
		||||
    acb->common.cb(acb->common.opaque, acb->ret);
 | 
			
		||||
    if (acb->finished) {
 | 
			
		||||
        *acb->finished = true;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_aio_release(acb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkverify_aio_cb(void *opaque, int ret)
 | 
			
		||||
{
 | 
			
		||||
    BlkverifyAIOCB *acb = opaque;
 | 
			
		||||
 | 
			
		||||
    switch (++acb->done) {
 | 
			
		||||
    case 1:
 | 
			
		||||
        acb->ret = ret;
 | 
			
		||||
        break;
 | 
			
		||||
 | 
			
		||||
    case 2:
 | 
			
		||||
        if (acb->ret != ret) {
 | 
			
		||||
            blkverify_err(acb, "return value mismatch %d != %d", acb->ret, ret);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (acb->verify) {
 | 
			
		||||
            acb->verify(acb);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        acb->bh = aio_bh_new(bdrv_get_aio_context(acb->common.bs),
 | 
			
		||||
                             blkverify_aio_bh, acb);
 | 
			
		||||
        qemu_bh_schedule(acb->bh);
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkverify_verify_readv(BlkverifyAIOCB *acb)
 | 
			
		||||
{
 | 
			
		||||
    ssize_t offset = qemu_iovec_compare(acb->qiov, &acb->raw_qiov);
 | 
			
		||||
    if (offset != -1) {
 | 
			
		||||
        blkverify_err(acb, "contents mismatch in sector %" PRId64,
 | 
			
		||||
                      acb->sector_num + (int64_t)(offset / BDRV_SECTOR_SIZE));
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *blkverify_aio_readv(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
    BlkverifyAIOCB *acb = blkverify_aio_get(bs, false, sector_num, qiov,
 | 
			
		||||
                                            nb_sectors, cb, opaque);
 | 
			
		||||
 | 
			
		||||
    acb->verify = blkverify_verify_readv;
 | 
			
		||||
    acb->buf = qemu_blockalign(bs->file, qiov->size);
 | 
			
		||||
    qemu_iovec_init(&acb->raw_qiov, acb->qiov->niov);
 | 
			
		||||
    qemu_iovec_clone(&acb->raw_qiov, qiov, acb->buf);
 | 
			
		||||
 | 
			
		||||
    bdrv_aio_readv(s->test_file, sector_num, qiov, nb_sectors,
 | 
			
		||||
                   blkverify_aio_cb, acb);
 | 
			
		||||
    bdrv_aio_readv(bs->file, sector_num, &acb->raw_qiov, nb_sectors,
 | 
			
		||||
                   blkverify_aio_cb, acb);
 | 
			
		||||
    return &acb->common;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *blkverify_aio_writev(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
    BlkverifyAIOCB *acb = blkverify_aio_get(bs, true, sector_num, qiov,
 | 
			
		||||
                                            nb_sectors, cb, opaque);
 | 
			
		||||
 | 
			
		||||
    bdrv_aio_writev(s->test_file, sector_num, qiov, nb_sectors,
 | 
			
		||||
                    blkverify_aio_cb, acb);
 | 
			
		||||
    bdrv_aio_writev(bs->file, sector_num, qiov, nb_sectors,
 | 
			
		||||
                    blkverify_aio_cb, acb);
 | 
			
		||||
    return &acb->common;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *blkverify_aio_flush(BlockDriverState *bs,
 | 
			
		||||
                                             BlockDriverCompletionFunc *cb,
 | 
			
		||||
                                             void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    /* Only flush test file, the raw file is not important */
 | 
			
		||||
    return bdrv_aio_flush(s->test_file, cb, opaque);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static bool blkverify_recurse_is_first_non_filter(BlockDriverState *bs,
 | 
			
		||||
                                                  BlockDriverState *candidate)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    bool perm = bdrv_recurse_is_first_non_filter(bs->file, candidate);
 | 
			
		||||
 | 
			
		||||
    if (perm) {
 | 
			
		||||
        return true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return bdrv_recurse_is_first_non_filter(s->test_file, candidate);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Propagate AioContext changes to ->test_file */
 | 
			
		||||
static void blkverify_detach_aio_context(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    bdrv_detach_aio_context(s->test_file);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void blkverify_attach_aio_context(BlockDriverState *bs,
 | 
			
		||||
                                         AioContext *new_context)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBlkverifyState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    bdrv_attach_aio_context(s->test_file, new_context);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_blkverify = {
 | 
			
		||||
    .format_name                      = "blkverify",
 | 
			
		||||
    .protocol_name                    = "blkverify",
 | 
			
		||||
    .instance_size                    = sizeof(BDRVBlkverifyState),
 | 
			
		||||
 | 
			
		||||
    .bdrv_parse_filename              = blkverify_parse_filename,
 | 
			
		||||
    .bdrv_file_open                   = blkverify_open,
 | 
			
		||||
    .bdrv_close                       = blkverify_close,
 | 
			
		||||
    .bdrv_getlength                   = blkverify_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv                   = blkverify_aio_readv,
 | 
			
		||||
    .bdrv_aio_writev                  = blkverify_aio_writev,
 | 
			
		||||
    .bdrv_aio_flush                   = blkverify_aio_flush,
 | 
			
		||||
 | 
			
		||||
    .bdrv_attach_aio_context          = blkverify_attach_aio_context,
 | 
			
		||||
    .bdrv_detach_aio_context          = blkverify_detach_aio_context,
 | 
			
		||||
 | 
			
		||||
    .is_filter                        = true,
 | 
			
		||||
    .bdrv_recurse_is_first_non_filter = blkverify_recurse_is_first_non_filter,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_blkverify_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_blkverify);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_blkverify_init);
 | 
			
		||||
							
								
								
									
										273
									
								
								block/bochs.c
									
									
									
									
									
								
							
							
						
						
									
										273
									
								
								block/bochs.c
									
									
									
									
									
								
							@@ -1,273 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the various disk image formats used by Bochs
 | 
			
		||||
 * Currently only for "growing" type in read-only mode
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2005 Alex Beregszaszi
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
 | 
			
		||||
#define HEADER_MAGIC "Bochs Virtual HD Image"
 | 
			
		||||
#define HEADER_VERSION 0x00020000
 | 
			
		||||
#define HEADER_V1 0x00010000
 | 
			
		||||
#define HEADER_SIZE 512
 | 
			
		||||
 | 
			
		||||
#define REDOLOG_TYPE "Redolog"
 | 
			
		||||
#define GROWING_TYPE "Growing"
 | 
			
		||||
 | 
			
		||||
// not allocated: 0xffffffff
 | 
			
		||||
 | 
			
		||||
// always little-endian
 | 
			
		||||
struct bochs_header {
 | 
			
		||||
    char magic[32];     /* "Bochs Virtual HD Image" */
 | 
			
		||||
    char type[16];      /* "Redolog" */
 | 
			
		||||
    char subtype[16];   /* "Undoable" / "Volatile" / "Growing" */
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t header;    /* size of header */
 | 
			
		||||
 | 
			
		||||
    uint32_t catalog;   /* num of entries */
 | 
			
		||||
    uint32_t bitmap;    /* bitmap size */
 | 
			
		||||
    uint32_t extent;    /* extent size */
 | 
			
		||||
 | 
			
		||||
    union {
 | 
			
		||||
        struct {
 | 
			
		||||
            uint32_t reserved;  /* for ??? */
 | 
			
		||||
            uint64_t disk;      /* disk size */
 | 
			
		||||
            char padding[HEADER_SIZE - 64 - 20 - 12];
 | 
			
		||||
        } QEMU_PACKED redolog;
 | 
			
		||||
        struct {
 | 
			
		||||
            uint64_t disk;      /* disk size */
 | 
			
		||||
            char padding[HEADER_SIZE - 64 - 20 - 8];
 | 
			
		||||
        } QEMU_PACKED redolog_v1;
 | 
			
		||||
        char padding[HEADER_SIZE - 64 - 20];
 | 
			
		||||
    } extra;
 | 
			
		||||
} QEMU_PACKED;
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVBochsState {
 | 
			
		||||
    CoMutex lock;
 | 
			
		||||
    uint32_t *catalog_bitmap;
 | 
			
		||||
    uint32_t catalog_size;
 | 
			
		||||
 | 
			
		||||
    uint32_t data_offset;
 | 
			
		||||
 | 
			
		||||
    uint32_t bitmap_blocks;
 | 
			
		||||
    uint32_t extent_blocks;
 | 
			
		||||
    uint32_t extent_size;
 | 
			
		||||
} BDRVBochsState;
 | 
			
		||||
 | 
			
		||||
static int bochs_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const struct bochs_header *bochs = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size < HEADER_SIZE)
 | 
			
		||||
	return 0;
 | 
			
		||||
 | 
			
		||||
    if (!strcmp(bochs->magic, HEADER_MAGIC) &&
 | 
			
		||||
	!strcmp(bochs->type, REDOLOG_TYPE) &&
 | 
			
		||||
	!strcmp(bochs->subtype, GROWING_TYPE) &&
 | 
			
		||||
	((le32_to_cpu(bochs->version) == HEADER_VERSION) ||
 | 
			
		||||
	(le32_to_cpu(bochs->version) == HEADER_V1)))
 | 
			
		||||
	return 100;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int bochs_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                      Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    uint32_t i;
 | 
			
		||||
    struct bochs_header bochs;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    bs->read_only = 1; // no write support yet
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, 0, &bochs, sizeof(bochs));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (strcmp(bochs.magic, HEADER_MAGIC) ||
 | 
			
		||||
        strcmp(bochs.type, REDOLOG_TYPE) ||
 | 
			
		||||
        strcmp(bochs.subtype, GROWING_TYPE) ||
 | 
			
		||||
	((le32_to_cpu(bochs.version) != HEADER_VERSION) &&
 | 
			
		||||
	(le32_to_cpu(bochs.version) != HEADER_V1))) {
 | 
			
		||||
        error_setg(errp, "Image not in Bochs format");
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (le32_to_cpu(bochs.version) == HEADER_V1) {
 | 
			
		||||
        bs->total_sectors = le64_to_cpu(bochs.extra.redolog_v1.disk) / 512;
 | 
			
		||||
    } else {
 | 
			
		||||
        bs->total_sectors = le64_to_cpu(bochs.extra.redolog.disk) / 512;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Limit to 1M entries to avoid unbounded allocation. This is what is
 | 
			
		||||
     * needed for the largest image that bximage can create (~8 TB). */
 | 
			
		||||
    s->catalog_size = le32_to_cpu(bochs.catalog);
 | 
			
		||||
    if (s->catalog_size > 0x100000) {
 | 
			
		||||
        error_setg(errp, "Catalog size is too large");
 | 
			
		||||
        return -EFBIG;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->catalog_bitmap = g_malloc(s->catalog_size * 4);
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, le32_to_cpu(bochs.header), s->catalog_bitmap,
 | 
			
		||||
                     s->catalog_size * 4);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < s->catalog_size; i++)
 | 
			
		||||
	le32_to_cpus(&s->catalog_bitmap[i]);
 | 
			
		||||
 | 
			
		||||
    s->data_offset = le32_to_cpu(bochs.header) + (s->catalog_size * 4);
 | 
			
		||||
 | 
			
		||||
    s->bitmap_blocks = 1 + (le32_to_cpu(bochs.bitmap) - 1) / 512;
 | 
			
		||||
    s->extent_blocks = 1 + (le32_to_cpu(bochs.extent) - 1) / 512;
 | 
			
		||||
 | 
			
		||||
    s->extent_size = le32_to_cpu(bochs.extent);
 | 
			
		||||
    if (s->extent_size < BDRV_SECTOR_SIZE) {
 | 
			
		||||
        /* bximage actually never creates extents smaller than 4k */
 | 
			
		||||
        error_setg(errp, "Extent size must be at least 512");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    } else if (!is_power_of_2(s->extent_size)) {
 | 
			
		||||
        error_setg(errp, "Extent size %" PRIu32 " is not a power of two",
 | 
			
		||||
                   s->extent_size);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    } else if (s->extent_size > 0x800000) {
 | 
			
		||||
        error_setg(errp, "Extent size %" PRIu32 " is too large",
 | 
			
		||||
                   s->extent_size);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (s->catalog_size < DIV_ROUND_UP(bs->total_sectors,
 | 
			
		||||
                                       s->extent_size / BDRV_SECTOR_SIZE))
 | 
			
		||||
    {
 | 
			
		||||
        error_setg(errp, "Catalog size is too small for this disk size");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_init(&s->lock);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    g_free(s->catalog_bitmap);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t seek_to_sector(BlockDriverState *bs, int64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    uint64_t offset = sector_num * 512;
 | 
			
		||||
    uint64_t extent_index, extent_offset, bitmap_offset;
 | 
			
		||||
    char bitmap_entry;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    // seek to sector
 | 
			
		||||
    extent_index = offset / s->extent_size;
 | 
			
		||||
    extent_offset = (offset % s->extent_size) / 512;
 | 
			
		||||
 | 
			
		||||
    if (s->catalog_bitmap[extent_index] == 0xffffffff) {
 | 
			
		||||
	return 0; /* not allocated */
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bitmap_offset = s->data_offset +
 | 
			
		||||
        (512 * (uint64_t) s->catalog_bitmap[extent_index] *
 | 
			
		||||
        (s->extent_blocks + s->bitmap_blocks));
 | 
			
		||||
 | 
			
		||||
    /* read in bitmap for current extent */
 | 
			
		||||
    ret = bdrv_pread(bs->file, bitmap_offset + (extent_offset / 8),
 | 
			
		||||
                     &bitmap_entry, 1);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!((bitmap_entry >> (extent_offset % 8)) & 1)) {
 | 
			
		||||
	return 0; /* not allocated */
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return bitmap_offset + (512 * (s->bitmap_blocks + extent_offset));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int bochs_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        int64_t block_offset = seek_to_sector(bs, sector_num);
 | 
			
		||||
        if (block_offset < 0) {
 | 
			
		||||
            return block_offset;
 | 
			
		||||
        } else if (block_offset > 0) {
 | 
			
		||||
            ret = bdrv_pread(bs->file, block_offset, buf, 512);
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                return ret;
 | 
			
		||||
            }
 | 
			
		||||
        } else {
 | 
			
		||||
            memset(buf, 0, 512);
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors--;
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int bochs_co_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                      uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    ret = bochs_read(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void bochs_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVBochsState *s = bs->opaque;
 | 
			
		||||
    g_free(s->catalog_bitmap);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_bochs = {
 | 
			
		||||
    .format_name	= "bochs",
 | 
			
		||||
    .instance_size	= sizeof(BDRVBochsState),
 | 
			
		||||
    .bdrv_probe		= bochs_probe,
 | 
			
		||||
    .bdrv_open		= bochs_open,
 | 
			
		||||
    .bdrv_read          = bochs_co_read,
 | 
			
		||||
    .bdrv_close		= bochs_close,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_bochs_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_bochs);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_bochs_init);
 | 
			
		||||
							
								
								
									
										266
									
								
								block/cloop.c
									
									
									
									
									
								
							
							
						
						
									
										266
									
								
								block/cloop.c
									
									
									
									
									
								
							@@ -1,266 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for CLOOP images
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Johannes E. Schindelin
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
#include <zlib.h>
 | 
			
		||||
 | 
			
		||||
/* Maximum compressed block size */
 | 
			
		||||
#define MAX_BLOCK_SIZE (64 * 1024 * 1024)
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVCloopState {
 | 
			
		||||
    CoMutex lock;
 | 
			
		||||
    uint32_t block_size;
 | 
			
		||||
    uint32_t n_blocks;
 | 
			
		||||
    uint64_t *offsets;
 | 
			
		||||
    uint32_t sectors_per_block;
 | 
			
		||||
    uint32_t current_block;
 | 
			
		||||
    uint8_t *compressed_block;
 | 
			
		||||
    uint8_t *uncompressed_block;
 | 
			
		||||
    z_stream zstream;
 | 
			
		||||
} BDRVCloopState;
 | 
			
		||||
 | 
			
		||||
static int cloop_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const char *magic_version_2_0 = "#!/bin/sh\n"
 | 
			
		||||
        "#V2.0 Format\n"
 | 
			
		||||
        "modprobe cloop file=$0 && mount -r -t iso9660 /dev/cloop $1\n";
 | 
			
		||||
    int length = strlen(magic_version_2_0);
 | 
			
		||||
    if (length > buf_size) {
 | 
			
		||||
        length = buf_size;
 | 
			
		||||
    }
 | 
			
		||||
    if (!memcmp(magic_version_2_0, buf, length)) {
 | 
			
		||||
        return 2;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cloop_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                      Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    uint32_t offsets_size, max_compressed_block_size = 1, i;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    bs->read_only = 1;
 | 
			
		||||
 | 
			
		||||
    /* read header */
 | 
			
		||||
    ret = bdrv_pread(bs->file, 128, &s->block_size, 4);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
    s->block_size = be32_to_cpu(s->block_size);
 | 
			
		||||
    if (s->block_size % 512) {
 | 
			
		||||
        error_setg(errp, "block_size %" PRIu32 " must be a multiple of 512",
 | 
			
		||||
                   s->block_size);
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
    if (s->block_size == 0) {
 | 
			
		||||
        error_setg(errp, "block_size cannot be zero");
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* cloop's create_compressed_fs.c warns about block sizes beyond 256 KB but
 | 
			
		||||
     * we can accept more.  Prevent ridiculous values like 4 GB - 1 since we
 | 
			
		||||
     * need a buffer this big.
 | 
			
		||||
     */
 | 
			
		||||
    if (s->block_size > MAX_BLOCK_SIZE) {
 | 
			
		||||
        error_setg(errp, "block_size %" PRIu32 " must be %u MB or less",
 | 
			
		||||
                   s->block_size,
 | 
			
		||||
                   MAX_BLOCK_SIZE / (1024 * 1024));
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, 128 + 4, &s->n_blocks, 4);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
    s->n_blocks = be32_to_cpu(s->n_blocks);
 | 
			
		||||
 | 
			
		||||
    /* read offsets */
 | 
			
		||||
    if (s->n_blocks > (UINT32_MAX - 1) / sizeof(uint64_t)) {
 | 
			
		||||
        /* Prevent integer overflow */
 | 
			
		||||
        error_setg(errp, "n_blocks %" PRIu32 " must be %zu or less",
 | 
			
		||||
                   s->n_blocks,
 | 
			
		||||
                   (UINT32_MAX - 1) / sizeof(uint64_t));
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
    offsets_size = (s->n_blocks + 1) * sizeof(uint64_t);
 | 
			
		||||
    if (offsets_size > 512 * 1024 * 1024) {
 | 
			
		||||
        /* Prevent ridiculous offsets_size which causes memory allocation to
 | 
			
		||||
         * fail or overflows bdrv_pread() size.  In practice the 512 MB
 | 
			
		||||
         * offsets[] limit supports 16 TB images at 256 KB block size.
 | 
			
		||||
         */
 | 
			
		||||
        error_setg(errp, "image requires too many offsets, "
 | 
			
		||||
                   "try increasing block size");
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
    s->offsets = g_malloc(offsets_size);
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, 128 + 4 + 4, s->offsets, offsets_size);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < s->n_blocks + 1; i++) {
 | 
			
		||||
        uint64_t size;
 | 
			
		||||
 | 
			
		||||
        s->offsets[i] = be64_to_cpu(s->offsets[i]);
 | 
			
		||||
        if (i == 0) {
 | 
			
		||||
            continue;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (s->offsets[i] < s->offsets[i - 1]) {
 | 
			
		||||
            error_setg(errp, "offsets not monotonically increasing at "
 | 
			
		||||
                       "index %" PRIu32 ", image file is corrupt", i);
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        size = s->offsets[i] - s->offsets[i - 1];
 | 
			
		||||
 | 
			
		||||
        /* Compressed blocks should be smaller than the uncompressed block size
 | 
			
		||||
         * but maybe compression performed poorly so the compressed block is
 | 
			
		||||
         * actually bigger.  Clamp down on unrealistic values to prevent
 | 
			
		||||
         * ridiculous s->compressed_block allocation.
 | 
			
		||||
         */
 | 
			
		||||
        if (size > 2 * MAX_BLOCK_SIZE) {
 | 
			
		||||
            error_setg(errp, "invalid compressed block size at index %" PRIu32
 | 
			
		||||
                       ", image file is corrupt", i);
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (size > max_compressed_block_size) {
 | 
			
		||||
            max_compressed_block_size = size;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* initialize zlib engine */
 | 
			
		||||
    s->compressed_block = g_malloc(max_compressed_block_size + 1);
 | 
			
		||||
    s->uncompressed_block = g_malloc(s->block_size);
 | 
			
		||||
    if (inflateInit(&s->zstream) != Z_OK) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    s->current_block = s->n_blocks;
 | 
			
		||||
 | 
			
		||||
    s->sectors_per_block = s->block_size/512;
 | 
			
		||||
    bs->total_sectors = s->n_blocks * s->sectors_per_block;
 | 
			
		||||
    qemu_co_mutex_init(&s->lock);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    g_free(s->offsets);
 | 
			
		||||
    g_free(s->compressed_block);
 | 
			
		||||
    g_free(s->uncompressed_block);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int cloop_read_block(BlockDriverState *bs, int block_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    if (s->current_block != block_num) {
 | 
			
		||||
        int ret;
 | 
			
		||||
        uint32_t bytes = s->offsets[block_num + 1] - s->offsets[block_num];
 | 
			
		||||
 | 
			
		||||
        ret = bdrv_pread(bs->file, s->offsets[block_num], s->compressed_block,
 | 
			
		||||
                         bytes);
 | 
			
		||||
        if (ret != bytes) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        s->zstream.next_in = s->compressed_block;
 | 
			
		||||
        s->zstream.avail_in = bytes;
 | 
			
		||||
        s->zstream.next_out = s->uncompressed_block;
 | 
			
		||||
        s->zstream.avail_out = s->block_size;
 | 
			
		||||
        ret = inflateReset(&s->zstream);
 | 
			
		||||
        if (ret != Z_OK) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        ret = inflate(&s->zstream, Z_FINISH);
 | 
			
		||||
        if (ret != Z_STREAM_END || s->zstream.total_out != s->block_size) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        s->current_block = block_num;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cloop_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < nb_sectors; i++) {
 | 
			
		||||
        uint32_t sector_offset_in_block =
 | 
			
		||||
            ((sector_num + i) % s->sectors_per_block),
 | 
			
		||||
            block_num = (sector_num + i) / s->sectors_per_block;
 | 
			
		||||
        if (cloop_read_block(bs, block_num) != 0) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        memcpy(buf + i * 512,
 | 
			
		||||
            s->uncompressed_block + sector_offset_in_block * 512, 512);
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int cloop_co_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                      uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    ret = cloop_read(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void cloop_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCloopState *s = bs->opaque;
 | 
			
		||||
    g_free(s->offsets);
 | 
			
		||||
    g_free(s->compressed_block);
 | 
			
		||||
    g_free(s->uncompressed_block);
 | 
			
		||||
    inflateEnd(&s->zstream);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_cloop = {
 | 
			
		||||
    .format_name    = "cloop",
 | 
			
		||||
    .instance_size  = sizeof(BDRVCloopState),
 | 
			
		||||
    .bdrv_probe     = cloop_probe,
 | 
			
		||||
    .bdrv_open      = cloop_open,
 | 
			
		||||
    .bdrv_read      = cloop_co_read,
 | 
			
		||||
    .bdrv_close     = cloop_close,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_cloop_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_cloop);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_cloop_init);
 | 
			
		||||
							
								
								
									
										255
									
								
								block/commit.c
									
									
									
									
									
								
							
							
						
						
									
										255
									
								
								block/commit.c
									
									
									
									
									
								
							@@ -1,255 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Live block commit
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright Red Hat, Inc. 2012
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Jeff Cody   <jcody@redhat.com>
 | 
			
		||||
 *  Based on stream.c by Stefan Hajnoczi
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU LGPL, version 2 or later.
 | 
			
		||||
 * See the COPYING.LIB file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "trace.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "block/blockjob.h"
 | 
			
		||||
#include "qemu/ratelimit.h"
 | 
			
		||||
 | 
			
		||||
enum {
 | 
			
		||||
    /*
 | 
			
		||||
     * Size of data buffer for populating the image file.  This should be large
 | 
			
		||||
     * enough to process multiple clusters in a single call, so that populating
 | 
			
		||||
     * contiguous regions of the image is efficient.
 | 
			
		||||
     */
 | 
			
		||||
    COMMIT_BUFFER_SIZE = 512 * 1024, /* in bytes */
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
#define SLICE_TIME 100000000ULL /* ns */
 | 
			
		||||
 | 
			
		||||
typedef struct CommitBlockJob {
 | 
			
		||||
    BlockJob common;
 | 
			
		||||
    RateLimit limit;
 | 
			
		||||
    BlockDriverState *active;
 | 
			
		||||
    BlockDriverState *top;
 | 
			
		||||
    BlockDriverState *base;
 | 
			
		||||
    BlockdevOnError on_error;
 | 
			
		||||
    int base_flags;
 | 
			
		||||
    int orig_overlay_flags;
 | 
			
		||||
    char *backing_file_str;
 | 
			
		||||
} CommitBlockJob;
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn commit_populate(BlockDriverState *bs,
 | 
			
		||||
                                        BlockDriverState *base,
 | 
			
		||||
                                        int64_t sector_num, int nb_sectors,
 | 
			
		||||
                                        void *buf)
 | 
			
		||||
{
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_read(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_write(base, sector_num, buf, nb_sectors);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void coroutine_fn commit_run(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    CommitBlockJob *s = opaque;
 | 
			
		||||
    BlockDriverState *active = s->active;
 | 
			
		||||
    BlockDriverState *top = s->top;
 | 
			
		||||
    BlockDriverState *base = s->base;
 | 
			
		||||
    BlockDriverState *overlay_bs;
 | 
			
		||||
    int64_t sector_num, end;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    int n = 0;
 | 
			
		||||
    void *buf;
 | 
			
		||||
    int bytes_written = 0;
 | 
			
		||||
    int64_t base_len;
 | 
			
		||||
 | 
			
		||||
    ret = s->common.len = bdrv_getlength(top);
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    if (s->common.len < 0) {
 | 
			
		||||
        goto exit_restore_reopen;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = base_len = bdrv_getlength(base);
 | 
			
		||||
    if (base_len < 0) {
 | 
			
		||||
        goto exit_restore_reopen;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (base_len < s->common.len) {
 | 
			
		||||
        ret = bdrv_truncate(base, s->common.len);
 | 
			
		||||
        if (ret) {
 | 
			
		||||
            goto exit_restore_reopen;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    end = s->common.len >> BDRV_SECTOR_BITS;
 | 
			
		||||
    buf = qemu_blockalign(top, COMMIT_BUFFER_SIZE);
 | 
			
		||||
 | 
			
		||||
    for (sector_num = 0; sector_num < end; sector_num += n) {
 | 
			
		||||
        uint64_t delay_ns = 0;
 | 
			
		||||
        bool copy;
 | 
			
		||||
 | 
			
		||||
wait:
 | 
			
		||||
        /* Note that even when no rate limit is applied we need to yield
 | 
			
		||||
         * with no pending I/O here so that bdrv_drain_all() returns.
 | 
			
		||||
         */
 | 
			
		||||
        block_job_sleep_ns(&s->common, QEMU_CLOCK_REALTIME, delay_ns);
 | 
			
		||||
        if (block_job_is_cancelled(&s->common)) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        /* Copy if allocated above the base */
 | 
			
		||||
        ret = bdrv_is_allocated_above(top, base, sector_num,
 | 
			
		||||
                                      COMMIT_BUFFER_SIZE / BDRV_SECTOR_SIZE,
 | 
			
		||||
                                      &n);
 | 
			
		||||
        copy = (ret == 1);
 | 
			
		||||
        trace_commit_one_iteration(s, sector_num, n, ret);
 | 
			
		||||
        if (copy) {
 | 
			
		||||
            if (s->common.speed) {
 | 
			
		||||
                delay_ns = ratelimit_calculate_delay(&s->limit, n);
 | 
			
		||||
                if (delay_ns > 0) {
 | 
			
		||||
                    goto wait;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
            ret = commit_populate(top, base, sector_num, n, buf);
 | 
			
		||||
            bytes_written += n * BDRV_SECTOR_SIZE;
 | 
			
		||||
        }
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            if (s->on_error == BLOCKDEV_ON_ERROR_STOP ||
 | 
			
		||||
                s->on_error == BLOCKDEV_ON_ERROR_REPORT||
 | 
			
		||||
                (s->on_error == BLOCKDEV_ON_ERROR_ENOSPC && ret == -ENOSPC)) {
 | 
			
		||||
                goto exit_free_buf;
 | 
			
		||||
            } else {
 | 
			
		||||
                n = 0;
 | 
			
		||||
                continue;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        /* Publish progress */
 | 
			
		||||
        s->common.offset += n * BDRV_SECTOR_SIZE;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = 0;
 | 
			
		||||
 | 
			
		||||
    if (!block_job_is_cancelled(&s->common) && sector_num == end) {
 | 
			
		||||
        /* success */
 | 
			
		||||
        ret = bdrv_drop_intermediate(active, top, base, s->backing_file_str);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
exit_free_buf:
 | 
			
		||||
    qemu_vfree(buf);
 | 
			
		||||
 | 
			
		||||
exit_restore_reopen:
 | 
			
		||||
    /* restore base open flags here if appropriate (e.g., change the base back
 | 
			
		||||
     * to r/o). These reopens do not need to be atomic, since we won't abort
 | 
			
		||||
     * even on failure here */
 | 
			
		||||
    if (s->base_flags != bdrv_get_flags(base)) {
 | 
			
		||||
        bdrv_reopen(base, s->base_flags, NULL);
 | 
			
		||||
    }
 | 
			
		||||
    overlay_bs = bdrv_find_overlay(active, top);
 | 
			
		||||
    if (overlay_bs && s->orig_overlay_flags != bdrv_get_flags(overlay_bs)) {
 | 
			
		||||
        bdrv_reopen(overlay_bs, s->orig_overlay_flags, NULL);
 | 
			
		||||
    }
 | 
			
		||||
    g_free(s->backing_file_str);
 | 
			
		||||
    block_job_completed(&s->common, ret);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void commit_set_speed(BlockJob *job, int64_t speed, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    CommitBlockJob *s = container_of(job, CommitBlockJob, common);
 | 
			
		||||
 | 
			
		||||
    if (speed < 0) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER, "speed");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    ratelimit_set_speed(&s->limit, speed / BDRV_SECTOR_SIZE, SLICE_TIME);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const BlockJobDriver commit_job_driver = {
 | 
			
		||||
    .instance_size = sizeof(CommitBlockJob),
 | 
			
		||||
    .job_type      = BLOCK_JOB_TYPE_COMMIT,
 | 
			
		||||
    .set_speed     = commit_set_speed,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
void commit_start(BlockDriverState *bs, BlockDriverState *base,
 | 
			
		||||
                  BlockDriverState *top, int64_t speed,
 | 
			
		||||
                  BlockdevOnError on_error, BlockDriverCompletionFunc *cb,
 | 
			
		||||
                  void *opaque, const char *backing_file_str, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    CommitBlockJob *s;
 | 
			
		||||
    BlockReopenQueue *reopen_queue = NULL;
 | 
			
		||||
    int orig_overlay_flags;
 | 
			
		||||
    int orig_base_flags;
 | 
			
		||||
    BlockDriverState *overlay_bs;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    if ((on_error == BLOCKDEV_ON_ERROR_STOP ||
 | 
			
		||||
         on_error == BLOCKDEV_ON_ERROR_ENOSPC) &&
 | 
			
		||||
        !bdrv_iostatus_is_enabled(bs)) {
 | 
			
		||||
        error_setg(errp, "Invalid parameter combination");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    assert(top != bs);
 | 
			
		||||
    if (top == base) {
 | 
			
		||||
        error_setg(errp, "Invalid files for merge: top and base are the same");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    overlay_bs = bdrv_find_overlay(bs, top);
 | 
			
		||||
 | 
			
		||||
    if (overlay_bs == NULL) {
 | 
			
		||||
        error_setg(errp, "Could not find overlay image for %s:", top->filename);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    orig_base_flags    = bdrv_get_flags(base);
 | 
			
		||||
    orig_overlay_flags = bdrv_get_flags(overlay_bs);
 | 
			
		||||
 | 
			
		||||
    /* convert base & overlay_bs to r/w, if necessary */
 | 
			
		||||
    if (!(orig_base_flags & BDRV_O_RDWR)) {
 | 
			
		||||
        reopen_queue = bdrv_reopen_queue(reopen_queue, base,
 | 
			
		||||
                                         orig_base_flags | BDRV_O_RDWR);
 | 
			
		||||
    }
 | 
			
		||||
    if (!(orig_overlay_flags & BDRV_O_RDWR)) {
 | 
			
		||||
        reopen_queue = bdrv_reopen_queue(reopen_queue, overlay_bs,
 | 
			
		||||
                                         orig_overlay_flags | BDRV_O_RDWR);
 | 
			
		||||
    }
 | 
			
		||||
    if (reopen_queue) {
 | 
			
		||||
        bdrv_reopen_multiple(reopen_queue, &local_err);
 | 
			
		||||
        if (local_err != NULL) {
 | 
			
		||||
            error_propagate(errp, local_err);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    s = block_job_create(&commit_job_driver, bs, speed, cb, opaque, errp);
 | 
			
		||||
    if (!s) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->base   = base;
 | 
			
		||||
    s->top    = top;
 | 
			
		||||
    s->active = bs;
 | 
			
		||||
 | 
			
		||||
    s->base_flags          = orig_base_flags;
 | 
			
		||||
    s->orig_overlay_flags  = orig_overlay_flags;
 | 
			
		||||
 | 
			
		||||
    s->backing_file_str = g_strdup(backing_file_str);
 | 
			
		||||
 | 
			
		||||
    s->on_error = on_error;
 | 
			
		||||
    s->common.co = qemu_coroutine_create(commit_run);
 | 
			
		||||
 | 
			
		||||
    trace_commit_start(bs, base, top, s, s->common.co, opaque);
 | 
			
		||||
    qemu_coroutine_enter(s->common.co, s);
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										432
									
								
								block/cow.c
									
									
									
									
									
								
							
							
						
						
									
										432
									
								
								block/cow.c
									
									
									
									
									
								
							@@ -1,432 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the COW format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
/* COW block driver using file system holes */
 | 
			
		||||
 | 
			
		||||
/* user mode linux compatible COW file */
 | 
			
		||||
#define COW_MAGIC 0x4f4f4f4d  /* MOOO */
 | 
			
		||||
#define COW_VERSION 2
 | 
			
		||||
 | 
			
		||||
struct cow_header_v2 {
 | 
			
		||||
    uint32_t magic;
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    char backing_file[1024];
 | 
			
		||||
    int32_t mtime;
 | 
			
		||||
    uint64_t size;
 | 
			
		||||
    uint32_t sectorsize;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVCowState {
 | 
			
		||||
    CoMutex lock;
 | 
			
		||||
    int64_t cow_sectors_offset;
 | 
			
		||||
} BDRVCowState;
 | 
			
		||||
 | 
			
		||||
static int cow_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const struct cow_header_v2 *cow_header = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size >= sizeof(struct cow_header_v2) &&
 | 
			
		||||
        be32_to_cpu(cow_header->magic) == COW_MAGIC &&
 | 
			
		||||
        be32_to_cpu(cow_header->version) == COW_VERSION)
 | 
			
		||||
        return 100;
 | 
			
		||||
    else
 | 
			
		||||
        return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                    Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    struct cow_header_v2 cow_header;
 | 
			
		||||
    int bitmap_size;
 | 
			
		||||
    int64_t size;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    /* see if it is a cow image */
 | 
			
		||||
    ret = bdrv_pread(bs->file, 0, &cow_header, sizeof(cow_header));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (be32_to_cpu(cow_header.magic) != COW_MAGIC) {
 | 
			
		||||
        error_setg(errp, "Image not in COW format");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (be32_to_cpu(cow_header.version) != COW_VERSION) {
 | 
			
		||||
        char version[64];
 | 
			
		||||
        snprintf(version, sizeof(version),
 | 
			
		||||
               "COW version %" PRIu32, cow_header.version);
 | 
			
		||||
        error_set(errp, QERR_UNKNOWN_BLOCK_FORMAT_FEATURE,
 | 
			
		||||
            bs->device_name, "cow", version);
 | 
			
		||||
        ret = -ENOTSUP;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* cow image found */
 | 
			
		||||
    size = be64_to_cpu(cow_header.size);
 | 
			
		||||
    bs->total_sectors = size / 512;
 | 
			
		||||
 | 
			
		||||
    pstrcpy(bs->backing_file, sizeof(bs->backing_file),
 | 
			
		||||
            cow_header.backing_file);
 | 
			
		||||
 | 
			
		||||
    bitmap_size = ((bs->total_sectors + 7) >> 3) + sizeof(cow_header);
 | 
			
		||||
    s->cow_sectors_offset = (bitmap_size + 511) & ~511;
 | 
			
		||||
    qemu_co_mutex_init(&s->lock);
 | 
			
		||||
    return 0;
 | 
			
		||||
 fail:
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline void cow_set_bits(uint8_t *bitmap, int start, int64_t nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int64_t bitnum = start, last = start + nb_sectors;
 | 
			
		||||
    while (bitnum < last) {
 | 
			
		||||
        if ((bitnum & 7) == 0 && bitnum + 8 <= last) {
 | 
			
		||||
            bitmap[bitnum / 8] = 0xFF;
 | 
			
		||||
            bitnum += 8;
 | 
			
		||||
            continue;
 | 
			
		||||
        }
 | 
			
		||||
        bitmap[bitnum/8] |= (1 << (bitnum % 8));
 | 
			
		||||
        bitnum++;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#define BITS_PER_BITMAP_SECTOR (512 * 8)
 | 
			
		||||
 | 
			
		||||
/* Cannot use bitmap.c on big-endian machines.  */
 | 
			
		||||
static int cow_test_bit(int64_t bitnum, const uint8_t *bitmap)
 | 
			
		||||
{
 | 
			
		||||
    return (bitmap[bitnum / 8] & (1 << (bitnum & 7))) != 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_find_streak(const uint8_t *bitmap, int value, int start, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int streak_value = value ? 0xFF : 0;
 | 
			
		||||
    int last = MIN(start + nb_sectors, BITS_PER_BITMAP_SECTOR);
 | 
			
		||||
    int bitnum = start;
 | 
			
		||||
    while (bitnum < last) {
 | 
			
		||||
        if ((bitnum & 7) == 0 && bitmap[bitnum / 8] == streak_value) {
 | 
			
		||||
            bitnum += 8;
 | 
			
		||||
            continue;
 | 
			
		||||
        }
 | 
			
		||||
        if (cow_test_bit(bitnum, bitmap) == value) {
 | 
			
		||||
            bitnum++;
 | 
			
		||||
            continue;
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
    return MIN(bitnum, last) - start;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Return true if first block has been changed (ie. current version is
 | 
			
		||||
 * in COW file).  Set the number of continuous blocks for which that
 | 
			
		||||
 * is true. */
 | 
			
		||||
static int coroutine_fn cow_co_is_allocated(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, int *num_same)
 | 
			
		||||
{
 | 
			
		||||
    int64_t bitnum = sector_num + sizeof(struct cow_header_v2) * 8;
 | 
			
		||||
    uint64_t offset = (bitnum / 8) & -BDRV_SECTOR_SIZE;
 | 
			
		||||
    bool first = true;
 | 
			
		||||
    int changed = 0, same = 0;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        int ret;
 | 
			
		||||
        uint8_t bitmap[BDRV_SECTOR_SIZE];
 | 
			
		||||
 | 
			
		||||
        bitnum &= BITS_PER_BITMAP_SECTOR - 1;
 | 
			
		||||
        int sector_bits = MIN(nb_sectors, BITS_PER_BITMAP_SECTOR - bitnum);
 | 
			
		||||
 | 
			
		||||
        ret = bdrv_pread(bs->file, offset, &bitmap, sizeof(bitmap));
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (first) {
 | 
			
		||||
            changed = cow_test_bit(bitnum, bitmap);
 | 
			
		||||
            first = false;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        same += cow_find_streak(bitmap, changed, bitnum, nb_sectors);
 | 
			
		||||
 | 
			
		||||
        bitnum += sector_bits;
 | 
			
		||||
        nb_sectors -= sector_bits;
 | 
			
		||||
        offset += BDRV_SECTOR_SIZE;
 | 
			
		||||
    } while (nb_sectors);
 | 
			
		||||
 | 
			
		||||
    *num_same = same;
 | 
			
		||||
    return changed;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t coroutine_fn cow_co_get_block_status(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, int *num_same)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    int ret = cow_co_is_allocated(bs, sector_num, nb_sectors, num_same);
 | 
			
		||||
    int64_t offset = s->cow_sectors_offset + (sector_num << BDRV_SECTOR_BITS);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
    return (ret ? BDRV_BLOCK_DATA : 0) | offset | BDRV_BLOCK_OFFSET_VALID;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_update_bitmap(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
        int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int64_t bitnum = sector_num + sizeof(struct cow_header_v2) * 8;
 | 
			
		||||
    uint64_t offset = (bitnum / 8) & -BDRV_SECTOR_SIZE;
 | 
			
		||||
    bool first = true;
 | 
			
		||||
    int sector_bits;
 | 
			
		||||
 | 
			
		||||
    for ( ; nb_sectors;
 | 
			
		||||
            bitnum += sector_bits,
 | 
			
		||||
            nb_sectors -= sector_bits,
 | 
			
		||||
            offset += BDRV_SECTOR_SIZE) {
 | 
			
		||||
        int ret, set;
 | 
			
		||||
        uint8_t bitmap[BDRV_SECTOR_SIZE];
 | 
			
		||||
 | 
			
		||||
        bitnum &= BITS_PER_BITMAP_SECTOR - 1;
 | 
			
		||||
        sector_bits = MIN(nb_sectors, BITS_PER_BITMAP_SECTOR - bitnum);
 | 
			
		||||
 | 
			
		||||
        ret = bdrv_pread(bs->file, offset, &bitmap, sizeof(bitmap));
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* Skip over any already set bits */
 | 
			
		||||
        set = cow_find_streak(bitmap, 1, bitnum, sector_bits);
 | 
			
		||||
        bitnum += set;
 | 
			
		||||
        sector_bits -= set;
 | 
			
		||||
        nb_sectors -= set;
 | 
			
		||||
        if (!sector_bits) {
 | 
			
		||||
            continue;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (first) {
 | 
			
		||||
            ret = bdrv_flush(bs->file);
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                return ret;
 | 
			
		||||
            }
 | 
			
		||||
            first = false;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        cow_set_bits(bitmap, bitnum, sector_bits);
 | 
			
		||||
 | 
			
		||||
        ret = bdrv_pwrite(bs->file, offset, &bitmap, sizeof(bitmap));
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn cow_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                 uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    int ret, n;
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        ret = cow_co_is_allocated(bs, sector_num, nb_sectors, &n);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
        if (ret) {
 | 
			
		||||
            ret = bdrv_pread(bs->file,
 | 
			
		||||
                        s->cow_sectors_offset + sector_num * 512,
 | 
			
		||||
                        buf, n * 512);
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                return ret;
 | 
			
		||||
            }
 | 
			
		||||
        } else {
 | 
			
		||||
            if (bs->backing_hd) {
 | 
			
		||||
                /* read from the base image */
 | 
			
		||||
                ret = bdrv_read(bs->backing_hd, sector_num, buf, n);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    return ret;
 | 
			
		||||
                }
 | 
			
		||||
            } else {
 | 
			
		||||
                memset(buf, 0, n * 512);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int cow_co_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    ret = cow_read(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                     const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pwrite(bs->file, s->cow_sectors_offset + sector_num * 512,
 | 
			
		||||
                      buf, nb_sectors * 512);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return cow_update_bitmap(bs, sector_num, nb_sectors);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int cow_co_write(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                     const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVCowState *s = bs->opaque;
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    ret = cow_write(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void cow_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int cow_create(const char *filename, QemuOpts *opts, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    struct cow_header_v2 cow_header;
 | 
			
		||||
    struct stat st;
 | 
			
		||||
    int64_t image_sectors = 0;
 | 
			
		||||
    char *image_filename = NULL;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    int ret;
 | 
			
		||||
    BlockDriverState *cow_bs = NULL;
 | 
			
		||||
 | 
			
		||||
    /* Read out options */
 | 
			
		||||
    image_sectors = qemu_opt_get_size_del(opts, BLOCK_OPT_SIZE, 0) / 512;
 | 
			
		||||
    image_filename = qemu_opt_get_del(opts, BLOCK_OPT_BACKING_FILE);
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_create_file(filename, opts, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_open(&cow_bs, filename, NULL, NULL,
 | 
			
		||||
                    BDRV_O_RDWR | BDRV_O_PROTOCOL, NULL, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    memset(&cow_header, 0, sizeof(cow_header));
 | 
			
		||||
    cow_header.magic = cpu_to_be32(COW_MAGIC);
 | 
			
		||||
    cow_header.version = cpu_to_be32(COW_VERSION);
 | 
			
		||||
    if (image_filename) {
 | 
			
		||||
        /* Note: if no file, we put a dummy mtime */
 | 
			
		||||
        cow_header.mtime = cpu_to_be32(0);
 | 
			
		||||
 | 
			
		||||
        if (stat(image_filename, &st) != 0) {
 | 
			
		||||
            goto mtime_fail;
 | 
			
		||||
        }
 | 
			
		||||
        cow_header.mtime = cpu_to_be32(st.st_mtime);
 | 
			
		||||
    mtime_fail:
 | 
			
		||||
        pstrcpy(cow_header.backing_file, sizeof(cow_header.backing_file),
 | 
			
		||||
                image_filename);
 | 
			
		||||
    }
 | 
			
		||||
    cow_header.sectorsize = cpu_to_be32(512);
 | 
			
		||||
    cow_header.size = cpu_to_be64(image_sectors * 512);
 | 
			
		||||
    ret = bdrv_pwrite(cow_bs, 0, &cow_header, sizeof(cow_header));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* resize to include at least all the bitmap */
 | 
			
		||||
    ret = bdrv_truncate(cow_bs,
 | 
			
		||||
        sizeof(cow_header) + ((image_sectors + 7) >> 3));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
exit:
 | 
			
		||||
    g_free(image_filename);
 | 
			
		||||
    if (cow_bs) {
 | 
			
		||||
        bdrv_unref(cow_bs);
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static QemuOptsList cow_create_opts = {
 | 
			
		||||
    .name = "cow-create-opts",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(cow_create_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_SIZE,
 | 
			
		||||
            .type = QEMU_OPT_SIZE,
 | 
			
		||||
            .help = "Virtual disk size"
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_BACKING_FILE,
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "File name of a base image"
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    }
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_cow = {
 | 
			
		||||
    .format_name    = "cow",
 | 
			
		||||
    .instance_size  = sizeof(BDRVCowState),
 | 
			
		||||
 | 
			
		||||
    .bdrv_probe     = cow_probe,
 | 
			
		||||
    .bdrv_open      = cow_open,
 | 
			
		||||
    .bdrv_close     = cow_close,
 | 
			
		||||
    .bdrv_create    = cow_create,
 | 
			
		||||
    .bdrv_has_zero_init     = bdrv_has_zero_init_1,
 | 
			
		||||
    .supports_backing       = true,
 | 
			
		||||
 | 
			
		||||
    .bdrv_read              = cow_co_read,
 | 
			
		||||
    .bdrv_write             = cow_co_write,
 | 
			
		||||
    .bdrv_co_get_block_status   = cow_co_get_block_status,
 | 
			
		||||
 | 
			
		||||
    .create_opts    = &cow_create_opts,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_cow_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_cow);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_cow_init);
 | 
			
		||||
							
								
								
									
										779
									
								
								block/curl.c
									
									
									
									
									
								
							
							
						
						
									
										779
									
								
								block/curl.c
									
									
									
									
									
								
							@@ -1,779 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for CURL images
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2009 Alexander Graf <agraf@suse.de>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qapi/qmp/qbool.h"
 | 
			
		||||
#include <curl/curl.h>
 | 
			
		||||
 | 
			
		||||
// #define DEBUG
 | 
			
		||||
// #define DEBUG_VERBOSE
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG_CURL
 | 
			
		||||
#define DPRINTF(fmt, ...) do { printf(fmt, ## __VA_ARGS__); } while (0)
 | 
			
		||||
#else
 | 
			
		||||
#define DPRINTF(fmt, ...) do { } while (0)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#if LIBCURL_VERSION_NUM >= 0x071000
 | 
			
		||||
/* The multi interface timer callback was introduced in 7.16.0 */
 | 
			
		||||
#define NEED_CURL_TIMER_CALLBACK
 | 
			
		||||
#define HAVE_SOCKET_ACTION
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#ifndef HAVE_SOCKET_ACTION
 | 
			
		||||
/* If curl_multi_socket_action isn't available, define it statically here in
 | 
			
		||||
 * terms of curl_multi_socket. Note that ev_bitmask will be ignored, which is
 | 
			
		||||
 * less efficient but still safe. */
 | 
			
		||||
static CURLMcode __curl_multi_socket_action(CURLM *multi_handle,
 | 
			
		||||
                                            curl_socket_t sockfd,
 | 
			
		||||
                                            int ev_bitmask,
 | 
			
		||||
                                            int *running_handles)
 | 
			
		||||
{
 | 
			
		||||
    return curl_multi_socket(multi_handle, sockfd, running_handles);
 | 
			
		||||
}
 | 
			
		||||
#define curl_multi_socket_action __curl_multi_socket_action
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define PROTOCOLS (CURLPROTO_HTTP | CURLPROTO_HTTPS | \
 | 
			
		||||
                   CURLPROTO_FTP | CURLPROTO_FTPS | \
 | 
			
		||||
                   CURLPROTO_TFTP)
 | 
			
		||||
 | 
			
		||||
#define CURL_NUM_STATES 8
 | 
			
		||||
#define CURL_NUM_ACB    8
 | 
			
		||||
#define SECTOR_SIZE     512
 | 
			
		||||
#define READ_AHEAD_DEFAULT (256 * 1024)
 | 
			
		||||
 | 
			
		||||
#define FIND_RET_NONE   0
 | 
			
		||||
#define FIND_RET_OK     1
 | 
			
		||||
#define FIND_RET_WAIT   2
 | 
			
		||||
 | 
			
		||||
#define CURL_BLOCK_OPT_URL       "url"
 | 
			
		||||
#define CURL_BLOCK_OPT_READAHEAD "readahead"
 | 
			
		||||
#define CURL_BLOCK_OPT_SSLVERIFY "sslverify"
 | 
			
		||||
 | 
			
		||||
struct BDRVCURLState;
 | 
			
		||||
 | 
			
		||||
typedef struct CURLAIOCB {
 | 
			
		||||
    BlockDriverAIOCB common;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
    QEMUIOVector *qiov;
 | 
			
		||||
 | 
			
		||||
    int64_t sector_num;
 | 
			
		||||
    int nb_sectors;
 | 
			
		||||
 | 
			
		||||
    size_t start;
 | 
			
		||||
    size_t end;
 | 
			
		||||
} CURLAIOCB;
 | 
			
		||||
 | 
			
		||||
typedef struct CURLState
 | 
			
		||||
{
 | 
			
		||||
    struct BDRVCURLState *s;
 | 
			
		||||
    CURLAIOCB *acb[CURL_NUM_ACB];
 | 
			
		||||
    CURL *curl;
 | 
			
		||||
    curl_socket_t sock_fd;
 | 
			
		||||
    char *orig_buf;
 | 
			
		||||
    size_t buf_start;
 | 
			
		||||
    size_t buf_off;
 | 
			
		||||
    size_t buf_len;
 | 
			
		||||
    char range[128];
 | 
			
		||||
    char errmsg[CURL_ERROR_SIZE];
 | 
			
		||||
    char in_use;
 | 
			
		||||
} CURLState;
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVCURLState {
 | 
			
		||||
    CURLM *multi;
 | 
			
		||||
    QEMUTimer timer;
 | 
			
		||||
    size_t len;
 | 
			
		||||
    CURLState states[CURL_NUM_STATES];
 | 
			
		||||
    char *url;
 | 
			
		||||
    size_t readahead_size;
 | 
			
		||||
    bool sslverify;
 | 
			
		||||
    bool accept_range;
 | 
			
		||||
    AioContext *aio_context;
 | 
			
		||||
} BDRVCURLState;
 | 
			
		||||
 | 
			
		||||
static void curl_clean_state(CURLState *s);
 | 
			
		||||
static void curl_multi_do(void *arg);
 | 
			
		||||
static void curl_multi_read(void *arg);
 | 
			
		||||
 | 
			
		||||
#ifdef NEED_CURL_TIMER_CALLBACK
 | 
			
		||||
static int curl_timer_cb(CURLM *multi, long timeout_ms, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = opaque;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("CURL: timer callback timeout_ms %ld\n", timeout_ms);
 | 
			
		||||
    if (timeout_ms == -1) {
 | 
			
		||||
        timer_del(&s->timer);
 | 
			
		||||
    } else {
 | 
			
		||||
        int64_t timeout_ns = (int64_t)timeout_ms * 1000 * 1000;
 | 
			
		||||
        timer_mod(&s->timer,
 | 
			
		||||
                  qemu_clock_get_ns(QEMU_CLOCK_REALTIME) + timeout_ns);
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static int curl_sock_cb(CURL *curl, curl_socket_t fd, int action,
 | 
			
		||||
                        void *userp, void *sp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s;
 | 
			
		||||
    CURLState *state = NULL;
 | 
			
		||||
    curl_easy_getinfo(curl, CURLINFO_PRIVATE, (char **)&state);
 | 
			
		||||
    state->sock_fd = fd;
 | 
			
		||||
    s = state->s;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("CURL (AIO): Sock action %d on fd %d\n", action, fd);
 | 
			
		||||
    switch (action) {
 | 
			
		||||
        case CURL_POLL_IN:
 | 
			
		||||
            aio_set_fd_handler(s->aio_context, fd, curl_multi_read,
 | 
			
		||||
                               NULL, state);
 | 
			
		||||
            break;
 | 
			
		||||
        case CURL_POLL_OUT:
 | 
			
		||||
            aio_set_fd_handler(s->aio_context, fd, NULL, curl_multi_do, state);
 | 
			
		||||
            break;
 | 
			
		||||
        case CURL_POLL_INOUT:
 | 
			
		||||
            aio_set_fd_handler(s->aio_context, fd, curl_multi_read,
 | 
			
		||||
                               curl_multi_do, state);
 | 
			
		||||
            break;
 | 
			
		||||
        case CURL_POLL_REMOVE:
 | 
			
		||||
            aio_set_fd_handler(s->aio_context, fd, NULL, NULL, NULL);
 | 
			
		||||
            break;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static size_t curl_header_cb(void *ptr, size_t size, size_t nmemb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = opaque;
 | 
			
		||||
    size_t realsize = size * nmemb;
 | 
			
		||||
    const char *accept_line = "Accept-Ranges: bytes";
 | 
			
		||||
 | 
			
		||||
    if (realsize >= strlen(accept_line)
 | 
			
		||||
        && strncmp((char *)ptr, accept_line, strlen(accept_line)) == 0) {
 | 
			
		||||
        s->accept_range = true;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return realsize;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static size_t curl_read_cb(void *ptr, size_t size, size_t nmemb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    CURLState *s = ((CURLState*)opaque);
 | 
			
		||||
    size_t realsize = size * nmemb;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("CURL: Just reading %zd bytes\n", realsize);
 | 
			
		||||
 | 
			
		||||
    if (!s || !s->orig_buf)
 | 
			
		||||
        return 0;
 | 
			
		||||
 | 
			
		||||
    if (s->buf_off >= s->buf_len) {
 | 
			
		||||
        /* buffer full, read nothing */
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    realsize = MIN(realsize, s->buf_len - s->buf_off);
 | 
			
		||||
    memcpy(s->orig_buf + s->buf_off, ptr, realsize);
 | 
			
		||||
    s->buf_off += realsize;
 | 
			
		||||
 | 
			
		||||
    for(i=0; i<CURL_NUM_ACB; i++) {
 | 
			
		||||
        CURLAIOCB *acb = s->acb[i];
 | 
			
		||||
 | 
			
		||||
        if (!acb)
 | 
			
		||||
            continue;
 | 
			
		||||
 | 
			
		||||
        if ((s->buf_off >= acb->end)) {
 | 
			
		||||
            qemu_iovec_from_buf(acb->qiov, 0, s->orig_buf + acb->start,
 | 
			
		||||
                                acb->end - acb->start);
 | 
			
		||||
            acb->common.cb(acb->common.opaque, 0);
 | 
			
		||||
            qemu_aio_release(acb);
 | 
			
		||||
            s->acb[i] = NULL;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return realsize;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int curl_find_buf(BDRVCURLState *s, size_t start, size_t len,
 | 
			
		||||
                         CURLAIOCB *acb)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
    size_t end = start + len;
 | 
			
		||||
 | 
			
		||||
    for (i=0; i<CURL_NUM_STATES; i++) {
 | 
			
		||||
        CURLState *state = &s->states[i];
 | 
			
		||||
        size_t buf_end = (state->buf_start + state->buf_off);
 | 
			
		||||
        size_t buf_fend = (state->buf_start + state->buf_len);
 | 
			
		||||
 | 
			
		||||
        if (!state->orig_buf)
 | 
			
		||||
            continue;
 | 
			
		||||
        if (!state->buf_off)
 | 
			
		||||
            continue;
 | 
			
		||||
 | 
			
		||||
        // Does the existing buffer cover our section?
 | 
			
		||||
        if ((start >= state->buf_start) &&
 | 
			
		||||
            (start <= buf_end) &&
 | 
			
		||||
            (end >= state->buf_start) &&
 | 
			
		||||
            (end <= buf_end))
 | 
			
		||||
        {
 | 
			
		||||
            char *buf = state->orig_buf + (start - state->buf_start);
 | 
			
		||||
 | 
			
		||||
            qemu_iovec_from_buf(acb->qiov, 0, buf, len);
 | 
			
		||||
            acb->common.cb(acb->common.opaque, 0);
 | 
			
		||||
 | 
			
		||||
            return FIND_RET_OK;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        // Wait for unfinished chunks
 | 
			
		||||
        if (state->in_use &&
 | 
			
		||||
            (start >= state->buf_start) &&
 | 
			
		||||
            (start <= buf_fend) &&
 | 
			
		||||
            (end >= state->buf_start) &&
 | 
			
		||||
            (end <= buf_fend))
 | 
			
		||||
        {
 | 
			
		||||
            int j;
 | 
			
		||||
 | 
			
		||||
            acb->start = start - state->buf_start;
 | 
			
		||||
            acb->end = acb->start + len;
 | 
			
		||||
 | 
			
		||||
            for (j=0; j<CURL_NUM_ACB; j++) {
 | 
			
		||||
                if (!state->acb[j]) {
 | 
			
		||||
                    state->acb[j] = acb;
 | 
			
		||||
                    return FIND_RET_WAIT;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return FIND_RET_NONE;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_multi_check_completion(BDRVCURLState *s)
 | 
			
		||||
{
 | 
			
		||||
    int msgs_in_queue;
 | 
			
		||||
 | 
			
		||||
    /* Try to find done transfers, so we can free the easy
 | 
			
		||||
     * handle again. */
 | 
			
		||||
    for (;;) {
 | 
			
		||||
        CURLMsg *msg;
 | 
			
		||||
        msg = curl_multi_info_read(s->multi, &msgs_in_queue);
 | 
			
		||||
 | 
			
		||||
        /* Quit when there are no more completions */
 | 
			
		||||
        if (!msg)
 | 
			
		||||
            break;
 | 
			
		||||
 | 
			
		||||
        if (msg->msg == CURLMSG_DONE) {
 | 
			
		||||
            CURLState *state = NULL;
 | 
			
		||||
            curl_easy_getinfo(msg->easy_handle, CURLINFO_PRIVATE,
 | 
			
		||||
                              (char **)&state);
 | 
			
		||||
 | 
			
		||||
            /* ACBs for successful messages get completed in curl_read_cb */
 | 
			
		||||
            if (msg->data.result != CURLE_OK) {
 | 
			
		||||
                int i;
 | 
			
		||||
                for (i = 0; i < CURL_NUM_ACB; i++) {
 | 
			
		||||
                    CURLAIOCB *acb = state->acb[i];
 | 
			
		||||
 | 
			
		||||
                    if (acb == NULL) {
 | 
			
		||||
                        continue;
 | 
			
		||||
                    }
 | 
			
		||||
 | 
			
		||||
                    acb->common.cb(acb->common.opaque, -EIO);
 | 
			
		||||
                    qemu_aio_release(acb);
 | 
			
		||||
                    state->acb[i] = NULL;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            curl_clean_state(state);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_multi_do(void *arg)
 | 
			
		||||
{
 | 
			
		||||
    CURLState *s = (CURLState *)arg;
 | 
			
		||||
    int running;
 | 
			
		||||
    int r;
 | 
			
		||||
 | 
			
		||||
    if (!s->s->multi) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        r = curl_multi_socket_action(s->s->multi, s->sock_fd, 0, &running);
 | 
			
		||||
    } while(r == CURLM_CALL_MULTI_PERFORM);
 | 
			
		||||
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_multi_read(void *arg)
 | 
			
		||||
{
 | 
			
		||||
    CURLState *s = (CURLState *)arg;
 | 
			
		||||
 | 
			
		||||
    curl_multi_do(arg);
 | 
			
		||||
    curl_multi_check_completion(s->s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_multi_timeout_do(void *arg)
 | 
			
		||||
{
 | 
			
		||||
#ifdef NEED_CURL_TIMER_CALLBACK
 | 
			
		||||
    BDRVCURLState *s = (BDRVCURLState *)arg;
 | 
			
		||||
    int running;
 | 
			
		||||
 | 
			
		||||
    if (!s->multi) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    curl_multi_socket_action(s->multi, CURL_SOCKET_TIMEOUT, 0, &running);
 | 
			
		||||
 | 
			
		||||
    curl_multi_check_completion(s);
 | 
			
		||||
#else
 | 
			
		||||
    abort();
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static CURLState *curl_init_state(BDRVCURLState *s)
 | 
			
		||||
{
 | 
			
		||||
    CURLState *state = NULL;
 | 
			
		||||
    int i, j;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        for (i=0; i<CURL_NUM_STATES; i++) {
 | 
			
		||||
            for (j=0; j<CURL_NUM_ACB; j++)
 | 
			
		||||
                if (s->states[i].acb[j])
 | 
			
		||||
                    continue;
 | 
			
		||||
            if (s->states[i].in_use)
 | 
			
		||||
                continue;
 | 
			
		||||
 | 
			
		||||
            state = &s->states[i];
 | 
			
		||||
            state->in_use = 1;
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        if (!state) {
 | 
			
		||||
            aio_poll(state->s->aio_context, true);
 | 
			
		||||
        }
 | 
			
		||||
    } while(!state);
 | 
			
		||||
 | 
			
		||||
    if (!state->curl) {
 | 
			
		||||
        state->curl = curl_easy_init();
 | 
			
		||||
        if (!state->curl) {
 | 
			
		||||
            return NULL;
 | 
			
		||||
        }
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_URL, s->url);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_SSL_VERIFYPEER,
 | 
			
		||||
                         (long) s->sslverify);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_TIMEOUT, 5);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_WRITEFUNCTION,
 | 
			
		||||
                         (void *)curl_read_cb);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_WRITEDATA, (void *)state);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_PRIVATE, (void *)state);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_AUTOREFERER, 1);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_FOLLOWLOCATION, 1);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_NOSIGNAL, 1);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_ERRORBUFFER, state->errmsg);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_FAILONERROR, 1);
 | 
			
		||||
 | 
			
		||||
        /* Restrict supported protocols to avoid security issues in the more
 | 
			
		||||
         * obscure protocols.  For example, do not allow POP3/SMTP/IMAP see
 | 
			
		||||
         * CVE-2013-0249.
 | 
			
		||||
         *
 | 
			
		||||
         * Restricting protocols is only supported from 7.19.4 upwards.
 | 
			
		||||
         */
 | 
			
		||||
#if LIBCURL_VERSION_NUM >= 0x071304
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_PROTOCOLS, PROTOCOLS);
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_REDIR_PROTOCOLS, PROTOCOLS);
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#ifdef DEBUG_VERBOSE
 | 
			
		||||
        curl_easy_setopt(state->curl, CURLOPT_VERBOSE, 1);
 | 
			
		||||
#endif
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    state->s = s;
 | 
			
		||||
 | 
			
		||||
    return state;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_clean_state(CURLState *s)
 | 
			
		||||
{
 | 
			
		||||
    if (s->s->multi)
 | 
			
		||||
        curl_multi_remove_handle(s->s->multi, s->curl);
 | 
			
		||||
    s->in_use = 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_parse_filename(const char *filename, QDict *options,
 | 
			
		||||
                                Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    qdict_put(options, CURL_BLOCK_OPT_URL, qstring_from_str(filename));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_detach_aio_context(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = bs->opaque;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < CURL_NUM_STATES; i++) {
 | 
			
		||||
        if (s->states[i].in_use) {
 | 
			
		||||
            curl_clean_state(&s->states[i]);
 | 
			
		||||
        }
 | 
			
		||||
        if (s->states[i].curl) {
 | 
			
		||||
            curl_easy_cleanup(s->states[i].curl);
 | 
			
		||||
            s->states[i].curl = NULL;
 | 
			
		||||
        }
 | 
			
		||||
        g_free(s->states[i].orig_buf);
 | 
			
		||||
        s->states[i].orig_buf = NULL;
 | 
			
		||||
    }
 | 
			
		||||
    if (s->multi) {
 | 
			
		||||
        curl_multi_cleanup(s->multi);
 | 
			
		||||
        s->multi = NULL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    timer_del(&s->timer);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_attach_aio_context(BlockDriverState *bs,
 | 
			
		||||
                                    AioContext *new_context)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    aio_timer_init(new_context, &s->timer,
 | 
			
		||||
                   QEMU_CLOCK_REALTIME, SCALE_NS,
 | 
			
		||||
                   curl_multi_timeout_do, s);
 | 
			
		||||
 | 
			
		||||
    assert(!s->multi);
 | 
			
		||||
    s->multi = curl_multi_init();
 | 
			
		||||
    s->aio_context = new_context;
 | 
			
		||||
    curl_multi_setopt(s->multi, CURLMOPT_SOCKETFUNCTION, curl_sock_cb);
 | 
			
		||||
#ifdef NEED_CURL_TIMER_CALLBACK
 | 
			
		||||
    curl_multi_setopt(s->multi, CURLMOPT_TIMERDATA, s);
 | 
			
		||||
    curl_multi_setopt(s->multi, CURLMOPT_TIMERFUNCTION, curl_timer_cb);
 | 
			
		||||
#endif
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static QemuOptsList runtime_opts = {
 | 
			
		||||
    .name = "curl",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = CURL_BLOCK_OPT_URL,
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "URL to open",
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = CURL_BLOCK_OPT_READAHEAD,
 | 
			
		||||
            .type = QEMU_OPT_SIZE,
 | 
			
		||||
            .help = "Readahead size",
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = CURL_BLOCK_OPT_SSLVERIFY,
 | 
			
		||||
            .type = QEMU_OPT_BOOL,
 | 
			
		||||
            .help = "Verify SSL certificate"
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static int curl_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                     Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = bs->opaque;
 | 
			
		||||
    CURLState *state = NULL;
 | 
			
		||||
    QemuOpts *opts;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    const char *file;
 | 
			
		||||
    double d;
 | 
			
		||||
 | 
			
		||||
    static int inited = 0;
 | 
			
		||||
 | 
			
		||||
    if (flags & BDRV_O_RDWR) {
 | 
			
		||||
        error_setg(errp, "curl block device does not support writes");
 | 
			
		||||
        return -EROFS;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
 | 
			
		||||
    qemu_opts_absorb_qdict(opts, options, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto out_noclean;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->readahead_size = qemu_opt_get_size(opts, CURL_BLOCK_OPT_READAHEAD,
 | 
			
		||||
                                          READ_AHEAD_DEFAULT);
 | 
			
		||||
    if ((s->readahead_size & 0x1ff) != 0) {
 | 
			
		||||
        error_setg(errp, "HTTP_READAHEAD_SIZE %zd is not a multiple of 512",
 | 
			
		||||
                   s->readahead_size);
 | 
			
		||||
        goto out_noclean;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->sslverify = qemu_opt_get_bool(opts, CURL_BLOCK_OPT_SSLVERIFY, true);
 | 
			
		||||
 | 
			
		||||
    file = qemu_opt_get(opts, CURL_BLOCK_OPT_URL);
 | 
			
		||||
    if (file == NULL) {
 | 
			
		||||
        error_setg(errp, "curl block driver requires an 'url' option");
 | 
			
		||||
        goto out_noclean;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!inited) {
 | 
			
		||||
        curl_global_init(CURL_GLOBAL_ALL);
 | 
			
		||||
        inited = 1;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    DPRINTF("CURL: Opening %s\n", file);
 | 
			
		||||
    s->aio_context = bdrv_get_aio_context(bs);
 | 
			
		||||
    s->url = g_strdup(file);
 | 
			
		||||
    state = curl_init_state(s);
 | 
			
		||||
    if (!state)
 | 
			
		||||
        goto out_noclean;
 | 
			
		||||
 | 
			
		||||
    // Get file size
 | 
			
		||||
 | 
			
		||||
    s->accept_range = false;
 | 
			
		||||
    curl_easy_setopt(state->curl, CURLOPT_NOBODY, 1);
 | 
			
		||||
    curl_easy_setopt(state->curl, CURLOPT_HEADERFUNCTION,
 | 
			
		||||
                     curl_header_cb);
 | 
			
		||||
    curl_easy_setopt(state->curl, CURLOPT_HEADERDATA, s);
 | 
			
		||||
    if (curl_easy_perform(state->curl))
 | 
			
		||||
        goto out;
 | 
			
		||||
    curl_easy_getinfo(state->curl, CURLINFO_CONTENT_LENGTH_DOWNLOAD, &d);
 | 
			
		||||
    if (d)
 | 
			
		||||
        s->len = (size_t)d;
 | 
			
		||||
    else if(!s->len)
 | 
			
		||||
        goto out;
 | 
			
		||||
    if ((!strncasecmp(s->url, "http://", strlen("http://"))
 | 
			
		||||
        || !strncasecmp(s->url, "https://", strlen("https://")))
 | 
			
		||||
        && !s->accept_range) {
 | 
			
		||||
        pstrcpy(state->errmsg, CURL_ERROR_SIZE,
 | 
			
		||||
                "Server does not support 'range' (byte ranges).");
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
    DPRINTF("CURL: Size = %zd\n", s->len);
 | 
			
		||||
 | 
			
		||||
    curl_clean_state(state);
 | 
			
		||||
    curl_easy_cleanup(state->curl);
 | 
			
		||||
    state->curl = NULL;
 | 
			
		||||
 | 
			
		||||
    curl_attach_aio_context(bs, bdrv_get_aio_context(bs));
 | 
			
		||||
 | 
			
		||||
    qemu_opts_del(opts);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    error_setg(errp, "CURL: Error opening file: %s", state->errmsg);
 | 
			
		||||
    curl_easy_cleanup(state->curl);
 | 
			
		||||
    state->curl = NULL;
 | 
			
		||||
out_noclean:
 | 
			
		||||
    g_free(s->url);
 | 
			
		||||
    qemu_opts_del(opts);
 | 
			
		||||
    return -EINVAL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_aio_cancel(BlockDriverAIOCB *blockacb)
 | 
			
		||||
{
 | 
			
		||||
    // Do we have to implement canceling? Seems to work without...
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const AIOCBInfo curl_aiocb_info = {
 | 
			
		||||
    .aiocb_size         = sizeof(CURLAIOCB),
 | 
			
		||||
    .cancel             = curl_aio_cancel,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static void curl_readv_bh_cb(void *p)
 | 
			
		||||
{
 | 
			
		||||
    CURLState *state;
 | 
			
		||||
    int running;
 | 
			
		||||
 | 
			
		||||
    CURLAIOCB *acb = p;
 | 
			
		||||
    BDRVCURLState *s = acb->common.bs->opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_bh_delete(acb->bh);
 | 
			
		||||
    acb->bh = NULL;
 | 
			
		||||
 | 
			
		||||
    size_t start = acb->sector_num * SECTOR_SIZE;
 | 
			
		||||
    size_t end;
 | 
			
		||||
 | 
			
		||||
    // In case we have the requested data already (e.g. read-ahead),
 | 
			
		||||
    // we can just call the callback and be done.
 | 
			
		||||
    switch (curl_find_buf(s, start, acb->nb_sectors * SECTOR_SIZE, acb)) {
 | 
			
		||||
        case FIND_RET_OK:
 | 
			
		||||
            qemu_aio_release(acb);
 | 
			
		||||
            // fall through
 | 
			
		||||
        case FIND_RET_WAIT:
 | 
			
		||||
            return;
 | 
			
		||||
        default:
 | 
			
		||||
            break;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    // No cache found, so let's start a new request
 | 
			
		||||
    state = curl_init_state(s);
 | 
			
		||||
    if (!state) {
 | 
			
		||||
        acb->common.cb(acb->common.opaque, -EIO);
 | 
			
		||||
        qemu_aio_release(acb);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    acb->start = 0;
 | 
			
		||||
    acb->end = (acb->nb_sectors * SECTOR_SIZE);
 | 
			
		||||
 | 
			
		||||
    state->buf_off = 0;
 | 
			
		||||
    g_free(state->orig_buf);
 | 
			
		||||
    state->buf_start = start;
 | 
			
		||||
    state->buf_len = acb->end + s->readahead_size;
 | 
			
		||||
    end = MIN(start + state->buf_len, s->len) - 1;
 | 
			
		||||
    state->orig_buf = g_malloc(state->buf_len);
 | 
			
		||||
    state->acb[0] = acb;
 | 
			
		||||
 | 
			
		||||
    snprintf(state->range, 127, "%zd-%zd", start, end);
 | 
			
		||||
    DPRINTF("CURL (AIO): Reading %d at %zd (%s)\n",
 | 
			
		||||
            (acb->nb_sectors * SECTOR_SIZE), start, state->range);
 | 
			
		||||
    curl_easy_setopt(state->curl, CURLOPT_RANGE, state->range);
 | 
			
		||||
 | 
			
		||||
    curl_multi_add_handle(s->multi, state->curl);
 | 
			
		||||
 | 
			
		||||
    /* Tell curl it needs to kick things off */
 | 
			
		||||
    curl_multi_socket_action(s->multi, CURL_SOCKET_TIMEOUT, 0, &running);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriverAIOCB *curl_aio_readv(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    CURLAIOCB *acb;
 | 
			
		||||
 | 
			
		||||
    acb = qemu_aio_get(&curl_aiocb_info, bs, cb, opaque);
 | 
			
		||||
 | 
			
		||||
    acb->qiov = qiov;
 | 
			
		||||
    acb->sector_num = sector_num;
 | 
			
		||||
    acb->nb_sectors = nb_sectors;
 | 
			
		||||
 | 
			
		||||
    acb->bh = aio_bh_new(bdrv_get_aio_context(bs), curl_readv_bh_cb, acb);
 | 
			
		||||
    qemu_bh_schedule(acb->bh);
 | 
			
		||||
    return &acb->common;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void curl_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    DPRINTF("CURL: Close\n");
 | 
			
		||||
    curl_detach_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
    g_free(s->url);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t curl_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVCURLState *s = bs->opaque;
 | 
			
		||||
    return s->len;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_http = {
 | 
			
		||||
    .format_name                = "http",
 | 
			
		||||
    .protocol_name              = "http",
 | 
			
		||||
 | 
			
		||||
    .instance_size              = sizeof(BDRVCURLState),
 | 
			
		||||
    .bdrv_parse_filename        = curl_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = curl_open,
 | 
			
		||||
    .bdrv_close                 = curl_close,
 | 
			
		||||
    .bdrv_getlength             = curl_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv             = curl_aio_readv,
 | 
			
		||||
 | 
			
		||||
    .bdrv_detach_aio_context    = curl_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = curl_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_https = {
 | 
			
		||||
    .format_name                = "https",
 | 
			
		||||
    .protocol_name              = "https",
 | 
			
		||||
 | 
			
		||||
    .instance_size              = sizeof(BDRVCURLState),
 | 
			
		||||
    .bdrv_parse_filename        = curl_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = curl_open,
 | 
			
		||||
    .bdrv_close                 = curl_close,
 | 
			
		||||
    .bdrv_getlength             = curl_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv             = curl_aio_readv,
 | 
			
		||||
 | 
			
		||||
    .bdrv_detach_aio_context    = curl_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = curl_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_ftp = {
 | 
			
		||||
    .format_name                = "ftp",
 | 
			
		||||
    .protocol_name              = "ftp",
 | 
			
		||||
 | 
			
		||||
    .instance_size              = sizeof(BDRVCURLState),
 | 
			
		||||
    .bdrv_parse_filename        = curl_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = curl_open,
 | 
			
		||||
    .bdrv_close                 = curl_close,
 | 
			
		||||
    .bdrv_getlength             = curl_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv             = curl_aio_readv,
 | 
			
		||||
 | 
			
		||||
    .bdrv_detach_aio_context    = curl_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = curl_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_ftps = {
 | 
			
		||||
    .format_name                = "ftps",
 | 
			
		||||
    .protocol_name              = "ftps",
 | 
			
		||||
 | 
			
		||||
    .instance_size              = sizeof(BDRVCURLState),
 | 
			
		||||
    .bdrv_parse_filename        = curl_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = curl_open,
 | 
			
		||||
    .bdrv_close                 = curl_close,
 | 
			
		||||
    .bdrv_getlength             = curl_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv             = curl_aio_readv,
 | 
			
		||||
 | 
			
		||||
    .bdrv_detach_aio_context    = curl_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = curl_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_tftp = {
 | 
			
		||||
    .format_name                = "tftp",
 | 
			
		||||
    .protocol_name              = "tftp",
 | 
			
		||||
 | 
			
		||||
    .instance_size              = sizeof(BDRVCURLState),
 | 
			
		||||
    .bdrv_parse_filename        = curl_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = curl_open,
 | 
			
		||||
    .bdrv_close                 = curl_close,
 | 
			
		||||
    .bdrv_getlength             = curl_getlength,
 | 
			
		||||
 | 
			
		||||
    .bdrv_aio_readv             = curl_aio_readv,
 | 
			
		||||
 | 
			
		||||
    .bdrv_detach_aio_context    = curl_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = curl_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void curl_block_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_http);
 | 
			
		||||
    bdrv_register(&bdrv_https);
 | 
			
		||||
    bdrv_register(&bdrv_ftp);
 | 
			
		||||
    bdrv_register(&bdrv_ftps);
 | 
			
		||||
    bdrv_register(&bdrv_tftp);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(curl_block_init);
 | 
			
		||||
							
								
								
									
										449
									
								
								block/dmg.c
									
									
									
									
									
								
							
							
						
						
									
										449
									
								
								block/dmg.c
									
									
									
									
									
								
							@@ -1,449 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for DMG images
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004 Johannes E. Schindelin
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/bswap.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
#include <zlib.h>
 | 
			
		||||
 | 
			
		||||
enum {
 | 
			
		||||
    /* Limit chunk sizes to prevent unreasonable amounts of memory being used
 | 
			
		||||
     * or truncating when converting to 32-bit types
 | 
			
		||||
     */
 | 
			
		||||
    DMG_LENGTHS_MAX = 64 * 1024 * 1024, /* 64 MB */
 | 
			
		||||
    DMG_SECTORCOUNTS_MAX = DMG_LENGTHS_MAX / 512,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVDMGState {
 | 
			
		||||
    CoMutex lock;
 | 
			
		||||
    /* each chunk contains a certain number of sectors,
 | 
			
		||||
     * offsets[i] is the offset in the .dmg file,
 | 
			
		||||
     * lengths[i] is the length of the compressed chunk,
 | 
			
		||||
     * sectors[i] is the sector beginning at offsets[i],
 | 
			
		||||
     * sectorcounts[i] is the number of sectors in that chunk,
 | 
			
		||||
     * the sectors array is ordered
 | 
			
		||||
     * 0<=i<n_chunks */
 | 
			
		||||
 | 
			
		||||
    uint32_t n_chunks;
 | 
			
		||||
    uint32_t* types;
 | 
			
		||||
    uint64_t* offsets;
 | 
			
		||||
    uint64_t* lengths;
 | 
			
		||||
    uint64_t* sectors;
 | 
			
		||||
    uint64_t* sectorcounts;
 | 
			
		||||
    uint32_t current_chunk;
 | 
			
		||||
    uint8_t *compressed_chunk;
 | 
			
		||||
    uint8_t *uncompressed_chunk;
 | 
			
		||||
    z_stream zstream;
 | 
			
		||||
} BDRVDMGState;
 | 
			
		||||
 | 
			
		||||
static int dmg_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    int len;
 | 
			
		||||
 | 
			
		||||
    if (!filename) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    len = strlen(filename);
 | 
			
		||||
    if (len > 4 && !strcmp(filename + len - 4, ".dmg")) {
 | 
			
		||||
        return 2;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int read_uint64(BlockDriverState *bs, int64_t offset, uint64_t *result)
 | 
			
		||||
{
 | 
			
		||||
    uint64_t buffer;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, offset, &buffer, 8);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *result = be64_to_cpu(buffer);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int read_uint32(BlockDriverState *bs, int64_t offset, uint32_t *result)
 | 
			
		||||
{
 | 
			
		||||
    uint32_t buffer;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, offset, &buffer, 4);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *result = be32_to_cpu(buffer);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* Increase max chunk sizes, if necessary.  This function is used to calculate
 | 
			
		||||
 * the buffer sizes needed for compressed/uncompressed chunk I/O.
 | 
			
		||||
 */
 | 
			
		||||
static void update_max_chunk_size(BDRVDMGState *s, uint32_t chunk,
 | 
			
		||||
                                  uint32_t *max_compressed_size,
 | 
			
		||||
                                  uint32_t *max_sectors_per_chunk)
 | 
			
		||||
{
 | 
			
		||||
    uint32_t compressed_size = 0;
 | 
			
		||||
    uint32_t uncompressed_sectors = 0;
 | 
			
		||||
 | 
			
		||||
    switch (s->types[chunk]) {
 | 
			
		||||
    case 0x80000005: /* zlib compressed */
 | 
			
		||||
        compressed_size = s->lengths[chunk];
 | 
			
		||||
        uncompressed_sectors = s->sectorcounts[chunk];
 | 
			
		||||
        break;
 | 
			
		||||
    case 1: /* copy */
 | 
			
		||||
        uncompressed_sectors = (s->lengths[chunk] + 511) / 512;
 | 
			
		||||
        break;
 | 
			
		||||
    case 2: /* zero */
 | 
			
		||||
        uncompressed_sectors = s->sectorcounts[chunk];
 | 
			
		||||
        break;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (compressed_size > *max_compressed_size) {
 | 
			
		||||
        *max_compressed_size = compressed_size;
 | 
			
		||||
    }
 | 
			
		||||
    if (uncompressed_sectors > *max_sectors_per_chunk) {
 | 
			
		||||
        *max_sectors_per_chunk = uncompressed_sectors;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int dmg_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                    Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
    uint64_t info_begin, info_end, last_in_offset, last_out_offset;
 | 
			
		||||
    uint32_t count, tmp;
 | 
			
		||||
    uint32_t max_compressed_size = 1, max_sectors_per_chunk = 1, i;
 | 
			
		||||
    int64_t offset;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    bs->read_only = 1;
 | 
			
		||||
    s->n_chunks = 0;
 | 
			
		||||
    s->offsets = s->lengths = s->sectors = s->sectorcounts = NULL;
 | 
			
		||||
 | 
			
		||||
    /* read offset of info blocks */
 | 
			
		||||
    offset = bdrv_getlength(bs->file);
 | 
			
		||||
    if (offset < 0) {
 | 
			
		||||
        ret = offset;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    offset -= 0x1d8;
 | 
			
		||||
 | 
			
		||||
    ret = read_uint64(bs, offset, &info_begin);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    } else if (info_begin == 0) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = read_uint32(bs, info_begin, &tmp);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    } else if (tmp != 0x100) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = read_uint32(bs, info_begin + 4, &count);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    } else if (count == 0) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    info_end = info_begin + count;
 | 
			
		||||
 | 
			
		||||
    offset = info_begin + 0x100;
 | 
			
		||||
 | 
			
		||||
    /* read offsets */
 | 
			
		||||
    last_in_offset = last_out_offset = 0;
 | 
			
		||||
    while (offset < info_end) {
 | 
			
		||||
        uint32_t type;
 | 
			
		||||
 | 
			
		||||
        ret = read_uint32(bs, offset, &count);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            goto fail;
 | 
			
		||||
        } else if (count == 0) {
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        offset += 4;
 | 
			
		||||
 | 
			
		||||
        ret = read_uint32(bs, offset, &type);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (type == 0x6d697368 && count >= 244) {
 | 
			
		||||
            size_t new_size;
 | 
			
		||||
            uint32_t chunk_count;
 | 
			
		||||
 | 
			
		||||
            offset += 4;
 | 
			
		||||
            offset += 200;
 | 
			
		||||
 | 
			
		||||
            chunk_count = (count - 204) / 40;
 | 
			
		||||
            new_size = sizeof(uint64_t) * (s->n_chunks + chunk_count);
 | 
			
		||||
            s->types = g_realloc(s->types, new_size / 2);
 | 
			
		||||
            s->offsets = g_realloc(s->offsets, new_size);
 | 
			
		||||
            s->lengths = g_realloc(s->lengths, new_size);
 | 
			
		||||
            s->sectors = g_realloc(s->sectors, new_size);
 | 
			
		||||
            s->sectorcounts = g_realloc(s->sectorcounts, new_size);
 | 
			
		||||
 | 
			
		||||
            for (i = s->n_chunks; i < s->n_chunks + chunk_count; i++) {
 | 
			
		||||
                ret = read_uint32(bs, offset, &s->types[i]);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
                offset += 4;
 | 
			
		||||
                if (s->types[i] != 0x80000005 && s->types[i] != 1 &&
 | 
			
		||||
                    s->types[i] != 2) {
 | 
			
		||||
                    if (s->types[i] == 0xffffffff && i > 0) {
 | 
			
		||||
                        last_in_offset = s->offsets[i - 1] + s->lengths[i - 1];
 | 
			
		||||
                        last_out_offset = s->sectors[i - 1] +
 | 
			
		||||
                                          s->sectorcounts[i - 1];
 | 
			
		||||
                    }
 | 
			
		||||
                    chunk_count--;
 | 
			
		||||
                    i--;
 | 
			
		||||
                    offset += 36;
 | 
			
		||||
                    continue;
 | 
			
		||||
                }
 | 
			
		||||
                offset += 4;
 | 
			
		||||
 | 
			
		||||
                ret = read_uint64(bs, offset, &s->sectors[i]);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
                s->sectors[i] += last_out_offset;
 | 
			
		||||
                offset += 8;
 | 
			
		||||
 | 
			
		||||
                ret = read_uint64(bs, offset, &s->sectorcounts[i]);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
                offset += 8;
 | 
			
		||||
 | 
			
		||||
                if (s->sectorcounts[i] > DMG_SECTORCOUNTS_MAX) {
 | 
			
		||||
                    error_report("sector count %" PRIu64 " for chunk %" PRIu32
 | 
			
		||||
                                 " is larger than max (%u)",
 | 
			
		||||
                                 s->sectorcounts[i], i, DMG_SECTORCOUNTS_MAX);
 | 
			
		||||
                    ret = -EINVAL;
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
 | 
			
		||||
                ret = read_uint64(bs, offset, &s->offsets[i]);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
                s->offsets[i] += last_in_offset;
 | 
			
		||||
                offset += 8;
 | 
			
		||||
 | 
			
		||||
                ret = read_uint64(bs, offset, &s->lengths[i]);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
                offset += 8;
 | 
			
		||||
 | 
			
		||||
                if (s->lengths[i] > DMG_LENGTHS_MAX) {
 | 
			
		||||
                    error_report("length %" PRIu64 " for chunk %" PRIu32
 | 
			
		||||
                                 " is larger than max (%u)",
 | 
			
		||||
                                 s->lengths[i], i, DMG_LENGTHS_MAX);
 | 
			
		||||
                    ret = -EINVAL;
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
 | 
			
		||||
                update_max_chunk_size(s, i, &max_compressed_size,
 | 
			
		||||
                                      &max_sectors_per_chunk);
 | 
			
		||||
            }
 | 
			
		||||
            s->n_chunks += chunk_count;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* initialize zlib engine */
 | 
			
		||||
    s->compressed_chunk = g_malloc(max_compressed_size + 1);
 | 
			
		||||
    s->uncompressed_chunk = g_malloc(512 * max_sectors_per_chunk);
 | 
			
		||||
    if (inflateInit(&s->zstream) != Z_OK) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->current_chunk = s->n_chunks;
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_init(&s->lock);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    g_free(s->types);
 | 
			
		||||
    g_free(s->offsets);
 | 
			
		||||
    g_free(s->lengths);
 | 
			
		||||
    g_free(s->sectors);
 | 
			
		||||
    g_free(s->sectorcounts);
 | 
			
		||||
    g_free(s->compressed_chunk);
 | 
			
		||||
    g_free(s->uncompressed_chunk);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int is_sector_in_chunk(BDRVDMGState* s,
 | 
			
		||||
                uint32_t chunk_num, uint64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    if (chunk_num >= s->n_chunks || s->sectors[chunk_num] > sector_num ||
 | 
			
		||||
            s->sectors[chunk_num] + s->sectorcounts[chunk_num] <= sector_num) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    } else {
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline uint32_t search_chunk(BDRVDMGState *s, uint64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    /* binary search */
 | 
			
		||||
    uint32_t chunk1 = 0, chunk2 = s->n_chunks, chunk3;
 | 
			
		||||
    while (chunk1 != chunk2) {
 | 
			
		||||
        chunk3 = (chunk1 + chunk2) / 2;
 | 
			
		||||
        if (s->sectors[chunk3] > sector_num) {
 | 
			
		||||
            chunk2 = chunk3;
 | 
			
		||||
        } else if (s->sectors[chunk3] + s->sectorcounts[chunk3] > sector_num) {
 | 
			
		||||
            return chunk3;
 | 
			
		||||
        } else {
 | 
			
		||||
            chunk1 = chunk3;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return s->n_chunks; /* error */
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int dmg_read_chunk(BlockDriverState *bs, uint64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    if (!is_sector_in_chunk(s, s->current_chunk, sector_num)) {
 | 
			
		||||
        int ret;
 | 
			
		||||
        uint32_t chunk = search_chunk(s, sector_num);
 | 
			
		||||
 | 
			
		||||
        if (chunk >= s->n_chunks) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        s->current_chunk = s->n_chunks;
 | 
			
		||||
        switch (s->types[chunk]) {
 | 
			
		||||
        case 0x80000005: { /* zlib compressed */
 | 
			
		||||
            /* we need to buffer, because only the chunk as whole can be
 | 
			
		||||
             * inflated. */
 | 
			
		||||
            ret = bdrv_pread(bs->file, s->offsets[chunk],
 | 
			
		||||
                             s->compressed_chunk, s->lengths[chunk]);
 | 
			
		||||
            if (ret != s->lengths[chunk]) {
 | 
			
		||||
                return -1;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            s->zstream.next_in = s->compressed_chunk;
 | 
			
		||||
            s->zstream.avail_in = s->lengths[chunk];
 | 
			
		||||
            s->zstream.next_out = s->uncompressed_chunk;
 | 
			
		||||
            s->zstream.avail_out = 512 * s->sectorcounts[chunk];
 | 
			
		||||
            ret = inflateReset(&s->zstream);
 | 
			
		||||
            if (ret != Z_OK) {
 | 
			
		||||
                return -1;
 | 
			
		||||
            }
 | 
			
		||||
            ret = inflate(&s->zstream, Z_FINISH);
 | 
			
		||||
            if (ret != Z_STREAM_END ||
 | 
			
		||||
                s->zstream.total_out != 512 * s->sectorcounts[chunk]) {
 | 
			
		||||
                return -1;
 | 
			
		||||
            }
 | 
			
		||||
            break; }
 | 
			
		||||
        case 1: /* copy */
 | 
			
		||||
            ret = bdrv_pread(bs->file, s->offsets[chunk],
 | 
			
		||||
                             s->uncompressed_chunk, s->lengths[chunk]);
 | 
			
		||||
            if (ret != s->lengths[chunk]) {
 | 
			
		||||
                return -1;
 | 
			
		||||
            }
 | 
			
		||||
            break;
 | 
			
		||||
        case 2: /* zero */
 | 
			
		||||
            memset(s->uncompressed_chunk, 0, 512 * s->sectorcounts[chunk]);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        s->current_chunk = chunk;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int dmg_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < nb_sectors; i++) {
 | 
			
		||||
        uint32_t sector_offset_in_chunk;
 | 
			
		||||
        if (dmg_read_chunk(bs, sector_num + i) != 0) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        sector_offset_in_chunk = sector_num + i - s->sectors[s->current_chunk];
 | 
			
		||||
        memcpy(buf + i * 512,
 | 
			
		||||
               s->uncompressed_chunk + sector_offset_in_chunk * 512, 512);
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int dmg_co_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    ret = dmg_read(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void dmg_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVDMGState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    g_free(s->types);
 | 
			
		||||
    g_free(s->offsets);
 | 
			
		||||
    g_free(s->lengths);
 | 
			
		||||
    g_free(s->sectors);
 | 
			
		||||
    g_free(s->sectorcounts);
 | 
			
		||||
    g_free(s->compressed_chunk);
 | 
			
		||||
    g_free(s->uncompressed_chunk);
 | 
			
		||||
 | 
			
		||||
    inflateEnd(&s->zstream);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_dmg = {
 | 
			
		||||
    .format_name    = "dmg",
 | 
			
		||||
    .instance_size  = sizeof(BDRVDMGState),
 | 
			
		||||
    .bdrv_probe     = dmg_probe,
 | 
			
		||||
    .bdrv_open      = dmg_open,
 | 
			
		||||
    .bdrv_read      = dmg_co_read,
 | 
			
		||||
    .bdrv_close     = dmg_close,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_dmg_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_dmg);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_dmg_init);
 | 
			
		||||
							
								
								
									
										834
									
								
								block/gluster.c
									
									
									
									
									
								
							
							
						
						
									
										834
									
								
								block/gluster.c
									
									
									
									
									
								
							@@ -1,834 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * GlusterFS backend for QEMU
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2012 Bharata B Rao <bharata@linux.vnet.ibm.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 */
 | 
			
		||||
#include <glusterfs/api/glfs.h>
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/uri.h"
 | 
			
		||||
 | 
			
		||||
typedef struct GlusterAIOCB {
 | 
			
		||||
    int64_t size;
 | 
			
		||||
    int ret;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
    Coroutine *coroutine;
 | 
			
		||||
    AioContext *aio_context;
 | 
			
		||||
} GlusterAIOCB;
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVGlusterState {
 | 
			
		||||
    struct glfs *glfs;
 | 
			
		||||
    struct glfs_fd *fd;
 | 
			
		||||
} BDRVGlusterState;
 | 
			
		||||
 | 
			
		||||
typedef struct GlusterConf {
 | 
			
		||||
    char *server;
 | 
			
		||||
    int port;
 | 
			
		||||
    char *volname;
 | 
			
		||||
    char *image;
 | 
			
		||||
    char *transport;
 | 
			
		||||
} GlusterConf;
 | 
			
		||||
 | 
			
		||||
static void qemu_gluster_gconf_free(GlusterConf *gconf)
 | 
			
		||||
{
 | 
			
		||||
    if (gconf) {
 | 
			
		||||
        g_free(gconf->server);
 | 
			
		||||
        g_free(gconf->volname);
 | 
			
		||||
        g_free(gconf->image);
 | 
			
		||||
        g_free(gconf->transport);
 | 
			
		||||
        g_free(gconf);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int parse_volume_options(GlusterConf *gconf, char *path)
 | 
			
		||||
{
 | 
			
		||||
    char *p, *q;
 | 
			
		||||
 | 
			
		||||
    if (!path) {
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* volume */
 | 
			
		||||
    p = q = path + strspn(path, "/");
 | 
			
		||||
    p += strcspn(p, "/");
 | 
			
		||||
    if (*p == '\0') {
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
    gconf->volname = g_strndup(q, p - q);
 | 
			
		||||
 | 
			
		||||
    /* image */
 | 
			
		||||
    p += strspn(p, "/");
 | 
			
		||||
    if (*p == '\0') {
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
    gconf->image = g_strdup(p);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * file=gluster[+transport]://[server[:port]]/volname/image[?socket=...]
 | 
			
		||||
 *
 | 
			
		||||
 * 'gluster' is the protocol.
 | 
			
		||||
 *
 | 
			
		||||
 * 'transport' specifies the transport type used to connect to gluster
 | 
			
		||||
 * management daemon (glusterd). Valid transport types are
 | 
			
		||||
 * tcp, unix and rdma. If a transport type isn't specified, then tcp
 | 
			
		||||
 * type is assumed.
 | 
			
		||||
 *
 | 
			
		||||
 * 'server' specifies the server where the volume file specification for
 | 
			
		||||
 * the given volume resides. This can be either hostname, ipv4 address
 | 
			
		||||
 * or ipv6 address. ipv6 address needs to be within square brackets [ ].
 | 
			
		||||
 * If transport type is 'unix', then 'server' field should not be specified.
 | 
			
		||||
 * The 'socket' field needs to be populated with the path to unix domain
 | 
			
		||||
 * socket.
 | 
			
		||||
 *
 | 
			
		||||
 * 'port' is the port number on which glusterd is listening. This is optional
 | 
			
		||||
 * and if not specified, QEMU will send 0 which will make gluster to use the
 | 
			
		||||
 * default port. If the transport type is unix, then 'port' should not be
 | 
			
		||||
 * specified.
 | 
			
		||||
 *
 | 
			
		||||
 * 'volname' is the name of the gluster volume which contains the VM image.
 | 
			
		||||
 *
 | 
			
		||||
 * 'image' is the path to the actual VM image that resides on gluster volume.
 | 
			
		||||
 *
 | 
			
		||||
 * Examples:
 | 
			
		||||
 *
 | 
			
		||||
 * file=gluster://1.2.3.4/testvol/a.img
 | 
			
		||||
 * file=gluster+tcp://1.2.3.4/testvol/a.img
 | 
			
		||||
 * file=gluster+tcp://1.2.3.4:24007/testvol/dir/a.img
 | 
			
		||||
 * file=gluster+tcp://[1:2:3:4:5:6:7:8]/testvol/dir/a.img
 | 
			
		||||
 * file=gluster+tcp://[1:2:3:4:5:6:7:8]:24007/testvol/dir/a.img
 | 
			
		||||
 * file=gluster+tcp://server.domain.com:24007/testvol/dir/a.img
 | 
			
		||||
 * file=gluster+unix:///testvol/dir/a.img?socket=/tmp/glusterd.socket
 | 
			
		||||
 * file=gluster+rdma://1.2.3.4:24007/testvol/a.img
 | 
			
		||||
 */
 | 
			
		||||
static int qemu_gluster_parseuri(GlusterConf *gconf, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    URI *uri;
 | 
			
		||||
    QueryParams *qp = NULL;
 | 
			
		||||
    bool is_unix = false;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
 | 
			
		||||
    uri = uri_parse(filename);
 | 
			
		||||
    if (!uri) {
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* transport */
 | 
			
		||||
    if (!uri->scheme || !strcmp(uri->scheme, "gluster")) {
 | 
			
		||||
        gconf->transport = g_strdup("tcp");
 | 
			
		||||
    } else if (!strcmp(uri->scheme, "gluster+tcp")) {
 | 
			
		||||
        gconf->transport = g_strdup("tcp");
 | 
			
		||||
    } else if (!strcmp(uri->scheme, "gluster+unix")) {
 | 
			
		||||
        gconf->transport = g_strdup("unix");
 | 
			
		||||
        is_unix = true;
 | 
			
		||||
    } else if (!strcmp(uri->scheme, "gluster+rdma")) {
 | 
			
		||||
        gconf->transport = g_strdup("rdma");
 | 
			
		||||
    } else {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = parse_volume_options(gconf, uri->path);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qp = query_params_parse(uri->query);
 | 
			
		||||
    if (qp->n > 1 || (is_unix && !qp->n) || (!is_unix && qp->n)) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (is_unix) {
 | 
			
		||||
        if (uri->server || uri->port) {
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
        if (strcmp(qp->p[0].name, "socket")) {
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
        gconf->server = g_strdup(qp->p[0].value);
 | 
			
		||||
    } else {
 | 
			
		||||
        gconf->server = g_strdup(uri->server ? uri->server : "localhost");
 | 
			
		||||
        gconf->port = uri->port;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    if (qp) {
 | 
			
		||||
        query_params_free(qp);
 | 
			
		||||
    }
 | 
			
		||||
    uri_free(uri);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static struct glfs *qemu_gluster_init(GlusterConf *gconf, const char *filename,
 | 
			
		||||
                                      Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    struct glfs *glfs = NULL;
 | 
			
		||||
    int ret;
 | 
			
		||||
    int old_errno;
 | 
			
		||||
 | 
			
		||||
    ret = qemu_gluster_parseuri(gconf, filename);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_setg(errp, "Usage: file=gluster[+transport]://[server[:port]]/"
 | 
			
		||||
                   "volname/image[?socket=...]");
 | 
			
		||||
        errno = -ret;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    glfs = glfs_new(gconf->volname);
 | 
			
		||||
    if (!glfs) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = glfs_set_volfile_server(glfs, gconf->transport, gconf->server,
 | 
			
		||||
            gconf->port);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * TODO: Use GF_LOG_ERROR instead of hard code value of 4 here when
 | 
			
		||||
     * GlusterFS makes GF_LOG_* macros available to libgfapi users.
 | 
			
		||||
     */
 | 
			
		||||
    ret = glfs_set_logging(glfs, "-", 4);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = glfs_init(glfs);
 | 
			
		||||
    if (ret) {
 | 
			
		||||
        error_setg_errno(errp, errno,
 | 
			
		||||
                         "Gluster connection failed for server=%s port=%d "
 | 
			
		||||
                         "volume=%s image=%s transport=%s", gconf->server,
 | 
			
		||||
                         gconf->port, gconf->volname, gconf->image,
 | 
			
		||||
                         gconf->transport);
 | 
			
		||||
 | 
			
		||||
        /* glfs_init sometimes doesn't set errno although docs suggest that */
 | 
			
		||||
        if (errno == 0)
 | 
			
		||||
            errno = EINVAL;
 | 
			
		||||
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
    return glfs;
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    if (glfs) {
 | 
			
		||||
        old_errno = errno;
 | 
			
		||||
        glfs_fini(glfs);
 | 
			
		||||
        errno = old_errno;
 | 
			
		||||
    }
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qemu_gluster_complete_aio(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    GlusterAIOCB *acb = (GlusterAIOCB *)opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_bh_delete(acb->bh);
 | 
			
		||||
    acb->bh = NULL;
 | 
			
		||||
    qemu_coroutine_enter(acb->coroutine, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * AIO callback routine called from GlusterFS thread.
 | 
			
		||||
 */
 | 
			
		||||
static void gluster_finish_aiocb(struct glfs_fd *fd, ssize_t ret, void *arg)
 | 
			
		||||
{
 | 
			
		||||
    GlusterAIOCB *acb = (GlusterAIOCB *)arg;
 | 
			
		||||
 | 
			
		||||
    if (!ret || ret == acb->size) {
 | 
			
		||||
        acb->ret = 0; /* Success */
 | 
			
		||||
    } else if (ret < 0) {
 | 
			
		||||
        acb->ret = ret; /* Read/Write failed */
 | 
			
		||||
    } else {
 | 
			
		||||
        acb->ret = -EIO; /* Partial read/write - fail it */
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    acb->bh = aio_bh_new(acb->aio_context, qemu_gluster_complete_aio, acb);
 | 
			
		||||
    qemu_bh_schedule(acb->bh);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* TODO Convert to fine grained options */
 | 
			
		||||
static QemuOptsList runtime_opts = {
 | 
			
		||||
    .name = "gluster",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = "filename",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "URL to the gluster image",
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void qemu_gluster_parse_flags(int bdrv_flags, int *open_flags)
 | 
			
		||||
{
 | 
			
		||||
    assert(open_flags != NULL);
 | 
			
		||||
 | 
			
		||||
    *open_flags |= O_BINARY;
 | 
			
		||||
 | 
			
		||||
    if (bdrv_flags & BDRV_O_RDWR) {
 | 
			
		||||
        *open_flags |= O_RDWR;
 | 
			
		||||
    } else {
 | 
			
		||||
        *open_flags |= O_RDONLY;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if ((bdrv_flags & BDRV_O_NOCACHE)) {
 | 
			
		||||
        *open_flags |= O_DIRECT;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qemu_gluster_open(BlockDriverState *bs,  QDict *options,
 | 
			
		||||
                             int bdrv_flags, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
    int open_flags = 0;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    GlusterConf *gconf = g_malloc0(sizeof(GlusterConf));
 | 
			
		||||
    QemuOpts *opts;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    const char *filename;
 | 
			
		||||
 | 
			
		||||
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
 | 
			
		||||
    qemu_opts_absorb_qdict(opts, options, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    filename = qemu_opt_get(opts, "filename");
 | 
			
		||||
 | 
			
		||||
    s->glfs = qemu_gluster_init(gconf, filename, errp);
 | 
			
		||||
    if (!s->glfs) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_gluster_parse_flags(bdrv_flags, &open_flags);
 | 
			
		||||
 | 
			
		||||
    s->fd = glfs_open(s->glfs, gconf->image, open_flags);
 | 
			
		||||
    if (!s->fd) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    qemu_opts_del(opts);
 | 
			
		||||
    qemu_gluster_gconf_free(gconf);
 | 
			
		||||
    if (!ret) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
    if (s->fd) {
 | 
			
		||||
        glfs_close(s->fd);
 | 
			
		||||
    }
 | 
			
		||||
    if (s->glfs) {
 | 
			
		||||
        glfs_fini(s->glfs);
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVGlusterReopenState {
 | 
			
		||||
    struct glfs *glfs;
 | 
			
		||||
    struct glfs_fd *fd;
 | 
			
		||||
} BDRVGlusterReopenState;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static int qemu_gluster_reopen_prepare(BDRVReopenState *state,
 | 
			
		||||
                                       BlockReopenQueue *queue, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    BDRVGlusterReopenState *reop_s;
 | 
			
		||||
    GlusterConf *gconf = NULL;
 | 
			
		||||
    int open_flags = 0;
 | 
			
		||||
 | 
			
		||||
    assert(state != NULL);
 | 
			
		||||
    assert(state->bs != NULL);
 | 
			
		||||
 | 
			
		||||
    state->opaque = g_malloc0(sizeof(BDRVGlusterReopenState));
 | 
			
		||||
    reop_s = state->opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_gluster_parse_flags(state->flags, &open_flags);
 | 
			
		||||
 | 
			
		||||
    gconf = g_malloc0(sizeof(GlusterConf));
 | 
			
		||||
 | 
			
		||||
    reop_s->glfs = qemu_gluster_init(gconf, state->bs->filename, errp);
 | 
			
		||||
    if (reop_s->glfs == NULL) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    reop_s->fd = glfs_open(reop_s->glfs, gconf->image, open_flags);
 | 
			
		||||
    if (reop_s->fd == NULL) {
 | 
			
		||||
        /* reops->glfs will be cleaned up in _abort */
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
exit:
 | 
			
		||||
    /* state->opaque will be freed in either the _abort or _commit */
 | 
			
		||||
    qemu_gluster_gconf_free(gconf);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qemu_gluster_reopen_commit(BDRVReopenState *state)
 | 
			
		||||
{
 | 
			
		||||
    BDRVGlusterReopenState *reop_s = state->opaque;
 | 
			
		||||
    BDRVGlusterState *s = state->bs->opaque;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    /* close the old */
 | 
			
		||||
    if (s->fd) {
 | 
			
		||||
        glfs_close(s->fd);
 | 
			
		||||
    }
 | 
			
		||||
    if (s->glfs) {
 | 
			
		||||
        glfs_fini(s->glfs);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* use the newly opened image / connection */
 | 
			
		||||
    s->fd         = reop_s->fd;
 | 
			
		||||
    s->glfs       = reop_s->glfs;
 | 
			
		||||
 | 
			
		||||
    g_free(state->opaque);
 | 
			
		||||
    state->opaque = NULL;
 | 
			
		||||
 | 
			
		||||
    return;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
static void qemu_gluster_reopen_abort(BDRVReopenState *state)
 | 
			
		||||
{
 | 
			
		||||
    BDRVGlusterReopenState *reop_s = state->opaque;
 | 
			
		||||
 | 
			
		||||
    if (reop_s == NULL) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (reop_s->fd) {
 | 
			
		||||
        glfs_close(reop_s->fd);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (reop_s->glfs) {
 | 
			
		||||
        glfs_fini(reop_s->glfs);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(state->opaque);
 | 
			
		||||
    state->opaque = NULL;
 | 
			
		||||
 | 
			
		||||
    return;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_ZEROFILL
 | 
			
		||||
static coroutine_fn int qemu_gluster_co_write_zeroes(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, BdrvRequestFlags flags)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    GlusterAIOCB *acb = g_slice_new(GlusterAIOCB);
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
    off_t size = nb_sectors * BDRV_SECTOR_SIZE;
 | 
			
		||||
    off_t offset = sector_num * BDRV_SECTOR_SIZE;
 | 
			
		||||
 | 
			
		||||
    acb->size = size;
 | 
			
		||||
    acb->ret = 0;
 | 
			
		||||
    acb->coroutine = qemu_coroutine_self();
 | 
			
		||||
    acb->aio_context = bdrv_get_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
    ret = glfs_zerofill_async(s->fd, offset, size, &gluster_finish_aiocb, acb);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_coroutine_yield();
 | 
			
		||||
    ret = acb->ret;
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    g_slice_free(GlusterAIOCB, acb);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline bool gluster_supports_zerofill(void)
 | 
			
		||||
{
 | 
			
		||||
    return 1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int qemu_gluster_zerofill(struct glfs_fd *fd, int64_t offset,
 | 
			
		||||
        int64_t size)
 | 
			
		||||
{
 | 
			
		||||
    return glfs_zerofill(fd, offset, size);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#else
 | 
			
		||||
static inline bool gluster_supports_zerofill(void)
 | 
			
		||||
{
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static inline int qemu_gluster_zerofill(struct glfs_fd *fd, int64_t offset,
 | 
			
		||||
        int64_t size)
 | 
			
		||||
{
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static int qemu_gluster_create(const char *filename,
 | 
			
		||||
                               QemuOpts *opts, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    struct glfs *glfs;
 | 
			
		||||
    struct glfs_fd *fd;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    int prealloc = 0;
 | 
			
		||||
    int64_t total_size = 0;
 | 
			
		||||
    char *tmp = NULL;
 | 
			
		||||
    GlusterConf *gconf = g_malloc0(sizeof(GlusterConf));
 | 
			
		||||
 | 
			
		||||
    glfs = qemu_gluster_init(gconf, filename, errp);
 | 
			
		||||
    if (!glfs) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    total_size =
 | 
			
		||||
        qemu_opt_get_size_del(opts, BLOCK_OPT_SIZE, 0) / BDRV_SECTOR_SIZE;
 | 
			
		||||
 | 
			
		||||
    tmp = qemu_opt_get_del(opts, BLOCK_OPT_PREALLOC);
 | 
			
		||||
    if (!tmp || !strcmp(tmp, "off")) {
 | 
			
		||||
        prealloc = 0;
 | 
			
		||||
    } else if (!strcmp(tmp, "full") &&
 | 
			
		||||
               gluster_supports_zerofill()) {
 | 
			
		||||
        prealloc = 1;
 | 
			
		||||
    } else {
 | 
			
		||||
        error_setg(errp, "Invalid preallocation mode: '%s'"
 | 
			
		||||
            " or GlusterFS doesn't support zerofill API",
 | 
			
		||||
            tmp);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    fd = glfs_creat(glfs, gconf->image,
 | 
			
		||||
        O_WRONLY | O_CREAT | O_TRUNC | O_BINARY, S_IRUSR | S_IWUSR);
 | 
			
		||||
    if (!fd) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
    } else {
 | 
			
		||||
        if (!glfs_ftruncate(fd, total_size * BDRV_SECTOR_SIZE)) {
 | 
			
		||||
            if (prealloc && qemu_gluster_zerofill(fd, 0,
 | 
			
		||||
                    total_size * BDRV_SECTOR_SIZE)) {
 | 
			
		||||
                ret = -errno;
 | 
			
		||||
            }
 | 
			
		||||
        } else {
 | 
			
		||||
            ret = -errno;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (glfs_close(fd) != 0) {
 | 
			
		||||
            ret = -errno;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
out:
 | 
			
		||||
    g_free(tmp);
 | 
			
		||||
    qemu_gluster_gconf_free(gconf);
 | 
			
		||||
    if (glfs) {
 | 
			
		||||
        glfs_fini(glfs);
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int qemu_gluster_co_rw(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, QEMUIOVector *qiov, int write)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    GlusterAIOCB *acb = g_slice_new(GlusterAIOCB);
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
    size_t size = nb_sectors * BDRV_SECTOR_SIZE;
 | 
			
		||||
    off_t offset = sector_num * BDRV_SECTOR_SIZE;
 | 
			
		||||
 | 
			
		||||
    acb->size = size;
 | 
			
		||||
    acb->ret = 0;
 | 
			
		||||
    acb->coroutine = qemu_coroutine_self();
 | 
			
		||||
    acb->aio_context = bdrv_get_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
    if (write) {
 | 
			
		||||
        ret = glfs_pwritev_async(s->fd, qiov->iov, qiov->niov, offset, 0,
 | 
			
		||||
            &gluster_finish_aiocb, acb);
 | 
			
		||||
    } else {
 | 
			
		||||
        ret = glfs_preadv_async(s->fd, qiov->iov, qiov->niov, offset, 0,
 | 
			
		||||
            &gluster_finish_aiocb, acb);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_coroutine_yield();
 | 
			
		||||
    ret = acb->ret;
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    g_slice_free(GlusterAIOCB, acb);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qemu_gluster_truncate(BlockDriverState *bs, int64_t offset)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    ret = glfs_ftruncate(s->fd, offset);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return -errno;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int qemu_gluster_co_readv(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    return qemu_gluster_co_rw(bs, sector_num, nb_sectors, qiov, 0);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int qemu_gluster_co_writev(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    return qemu_gluster_co_rw(bs, sector_num, nb_sectors, qiov, 1);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int qemu_gluster_co_flush_to_disk(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    GlusterAIOCB *acb = g_slice_new(GlusterAIOCB);
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    acb->size = 0;
 | 
			
		||||
    acb->ret = 0;
 | 
			
		||||
    acb->coroutine = qemu_coroutine_self();
 | 
			
		||||
    acb->aio_context = bdrv_get_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
    ret = glfs_fsync_async(s->fd, &gluster_finish_aiocb, acb);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_coroutine_yield();
 | 
			
		||||
    ret = acb->ret;
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    g_slice_free(GlusterAIOCB, acb);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_DISCARD
 | 
			
		||||
static coroutine_fn int qemu_gluster_co_discard(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    GlusterAIOCB *acb = g_slice_new(GlusterAIOCB);
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
    size_t size = nb_sectors * BDRV_SECTOR_SIZE;
 | 
			
		||||
    off_t offset = sector_num * BDRV_SECTOR_SIZE;
 | 
			
		||||
 | 
			
		||||
    acb->size = 0;
 | 
			
		||||
    acb->ret = 0;
 | 
			
		||||
    acb->coroutine = qemu_coroutine_self();
 | 
			
		||||
    acb->aio_context = bdrv_get_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
    ret = glfs_discard_async(s->fd, offset, size, &gluster_finish_aiocb, acb);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        ret = -errno;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_coroutine_yield();
 | 
			
		||||
    ret = acb->ret;
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    g_slice_free(GlusterAIOCB, acb);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
static int64_t qemu_gluster_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
    int64_t ret;
 | 
			
		||||
 | 
			
		||||
    ret = glfs_lseek(s->fd, 0, SEEK_END);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return -errno;
 | 
			
		||||
    } else {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t qemu_gluster_allocated_file_size(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
    struct stat st;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = glfs_fstat(s->fd, &st);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return -errno;
 | 
			
		||||
    } else {
 | 
			
		||||
        return st.st_blocks * 512;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qemu_gluster_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVGlusterState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    if (s->fd) {
 | 
			
		||||
        glfs_close(s->fd);
 | 
			
		||||
        s->fd = NULL;
 | 
			
		||||
    }
 | 
			
		||||
    glfs_fini(s->glfs);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qemu_gluster_has_zero_init(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    /* GlusterFS volume could be backed by a block device */
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static QemuOptsList qemu_gluster_create_opts = {
 | 
			
		||||
    .name = "qemu-gluster-create-opts",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(qemu_gluster_create_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_SIZE,
 | 
			
		||||
            .type = QEMU_OPT_SIZE,
 | 
			
		||||
            .help = "Virtual disk size"
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_PREALLOC,
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "Preallocation mode (allowed values: off, full)"
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    }
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_gluster = {
 | 
			
		||||
    .format_name                  = "gluster",
 | 
			
		||||
    .protocol_name                = "gluster",
 | 
			
		||||
    .instance_size                = sizeof(BDRVGlusterState),
 | 
			
		||||
    .bdrv_needs_filename          = true,
 | 
			
		||||
    .bdrv_file_open               = qemu_gluster_open,
 | 
			
		||||
    .bdrv_reopen_prepare          = qemu_gluster_reopen_prepare,
 | 
			
		||||
    .bdrv_reopen_commit           = qemu_gluster_reopen_commit,
 | 
			
		||||
    .bdrv_reopen_abort            = qemu_gluster_reopen_abort,
 | 
			
		||||
    .bdrv_close                   = qemu_gluster_close,
 | 
			
		||||
    .bdrv_create                  = qemu_gluster_create,
 | 
			
		||||
    .bdrv_getlength               = qemu_gluster_getlength,
 | 
			
		||||
    .bdrv_get_allocated_file_size = qemu_gluster_allocated_file_size,
 | 
			
		||||
    .bdrv_truncate                = qemu_gluster_truncate,
 | 
			
		||||
    .bdrv_co_readv                = qemu_gluster_co_readv,
 | 
			
		||||
    .bdrv_co_writev               = qemu_gluster_co_writev,
 | 
			
		||||
    .bdrv_co_flush_to_disk        = qemu_gluster_co_flush_to_disk,
 | 
			
		||||
    .bdrv_has_zero_init           = qemu_gluster_has_zero_init,
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_DISCARD
 | 
			
		||||
    .bdrv_co_discard              = qemu_gluster_co_discard,
 | 
			
		||||
#endif
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_ZEROFILL
 | 
			
		||||
    .bdrv_co_write_zeroes         = qemu_gluster_co_write_zeroes,
 | 
			
		||||
#endif
 | 
			
		||||
    .create_opts                  = &qemu_gluster_create_opts,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_gluster_tcp = {
 | 
			
		||||
    .format_name                  = "gluster",
 | 
			
		||||
    .protocol_name                = "gluster+tcp",
 | 
			
		||||
    .instance_size                = sizeof(BDRVGlusterState),
 | 
			
		||||
    .bdrv_needs_filename          = true,
 | 
			
		||||
    .bdrv_file_open               = qemu_gluster_open,
 | 
			
		||||
    .bdrv_reopen_prepare          = qemu_gluster_reopen_prepare,
 | 
			
		||||
    .bdrv_reopen_commit           = qemu_gluster_reopen_commit,
 | 
			
		||||
    .bdrv_reopen_abort            = qemu_gluster_reopen_abort,
 | 
			
		||||
    .bdrv_close                   = qemu_gluster_close,
 | 
			
		||||
    .bdrv_create                  = qemu_gluster_create,
 | 
			
		||||
    .bdrv_getlength               = qemu_gluster_getlength,
 | 
			
		||||
    .bdrv_get_allocated_file_size = qemu_gluster_allocated_file_size,
 | 
			
		||||
    .bdrv_truncate                = qemu_gluster_truncate,
 | 
			
		||||
    .bdrv_co_readv                = qemu_gluster_co_readv,
 | 
			
		||||
    .bdrv_co_writev               = qemu_gluster_co_writev,
 | 
			
		||||
    .bdrv_co_flush_to_disk        = qemu_gluster_co_flush_to_disk,
 | 
			
		||||
    .bdrv_has_zero_init           = qemu_gluster_has_zero_init,
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_DISCARD
 | 
			
		||||
    .bdrv_co_discard              = qemu_gluster_co_discard,
 | 
			
		||||
#endif
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_ZEROFILL
 | 
			
		||||
    .bdrv_co_write_zeroes         = qemu_gluster_co_write_zeroes,
 | 
			
		||||
#endif
 | 
			
		||||
    .create_opts                  = &qemu_gluster_create_opts,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_gluster_unix = {
 | 
			
		||||
    .format_name                  = "gluster",
 | 
			
		||||
    .protocol_name                = "gluster+unix",
 | 
			
		||||
    .instance_size                = sizeof(BDRVGlusterState),
 | 
			
		||||
    .bdrv_needs_filename          = true,
 | 
			
		||||
    .bdrv_file_open               = qemu_gluster_open,
 | 
			
		||||
    .bdrv_reopen_prepare          = qemu_gluster_reopen_prepare,
 | 
			
		||||
    .bdrv_reopen_commit           = qemu_gluster_reopen_commit,
 | 
			
		||||
    .bdrv_reopen_abort            = qemu_gluster_reopen_abort,
 | 
			
		||||
    .bdrv_close                   = qemu_gluster_close,
 | 
			
		||||
    .bdrv_create                  = qemu_gluster_create,
 | 
			
		||||
    .bdrv_getlength               = qemu_gluster_getlength,
 | 
			
		||||
    .bdrv_get_allocated_file_size = qemu_gluster_allocated_file_size,
 | 
			
		||||
    .bdrv_truncate                = qemu_gluster_truncate,
 | 
			
		||||
    .bdrv_co_readv                = qemu_gluster_co_readv,
 | 
			
		||||
    .bdrv_co_writev               = qemu_gluster_co_writev,
 | 
			
		||||
    .bdrv_co_flush_to_disk        = qemu_gluster_co_flush_to_disk,
 | 
			
		||||
    .bdrv_has_zero_init           = qemu_gluster_has_zero_init,
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_DISCARD
 | 
			
		||||
    .bdrv_co_discard              = qemu_gluster_co_discard,
 | 
			
		||||
#endif
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_ZEROFILL
 | 
			
		||||
    .bdrv_co_write_zeroes         = qemu_gluster_co_write_zeroes,
 | 
			
		||||
#endif
 | 
			
		||||
    .create_opts                  = &qemu_gluster_create_opts,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_gluster_rdma = {
 | 
			
		||||
    .format_name                  = "gluster",
 | 
			
		||||
    .protocol_name                = "gluster+rdma",
 | 
			
		||||
    .instance_size                = sizeof(BDRVGlusterState),
 | 
			
		||||
    .bdrv_needs_filename          = true,
 | 
			
		||||
    .bdrv_file_open               = qemu_gluster_open,
 | 
			
		||||
    .bdrv_reopen_prepare          = qemu_gluster_reopen_prepare,
 | 
			
		||||
    .bdrv_reopen_commit           = qemu_gluster_reopen_commit,
 | 
			
		||||
    .bdrv_reopen_abort            = qemu_gluster_reopen_abort,
 | 
			
		||||
    .bdrv_close                   = qemu_gluster_close,
 | 
			
		||||
    .bdrv_create                  = qemu_gluster_create,
 | 
			
		||||
    .bdrv_getlength               = qemu_gluster_getlength,
 | 
			
		||||
    .bdrv_get_allocated_file_size = qemu_gluster_allocated_file_size,
 | 
			
		||||
    .bdrv_truncate                = qemu_gluster_truncate,
 | 
			
		||||
    .bdrv_co_readv                = qemu_gluster_co_readv,
 | 
			
		||||
    .bdrv_co_writev               = qemu_gluster_co_writev,
 | 
			
		||||
    .bdrv_co_flush_to_disk        = qemu_gluster_co_flush_to_disk,
 | 
			
		||||
    .bdrv_has_zero_init           = qemu_gluster_has_zero_init,
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_DISCARD
 | 
			
		||||
    .bdrv_co_discard              = qemu_gluster_co_discard,
 | 
			
		||||
#endif
 | 
			
		||||
#ifdef CONFIG_GLUSTERFS_ZEROFILL
 | 
			
		||||
    .bdrv_co_write_zeroes         = qemu_gluster_co_write_zeroes,
 | 
			
		||||
#endif
 | 
			
		||||
    .create_opts                  = &qemu_gluster_create_opts,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_gluster_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_gluster_rdma);
 | 
			
		||||
    bdrv_register(&bdrv_gluster_unix);
 | 
			
		||||
    bdrv_register(&bdrv_gluster_tcp);
 | 
			
		||||
    bdrv_register(&bdrv_gluster);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_gluster_init);
 | 
			
		||||
							
								
								
									
										1652
									
								
								block/iscsi.c
									
									
									
									
									
								
							
							
						
						
									
										1652
									
								
								block/iscsi.c
									
									
									
									
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							@@ -1,319 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Linux native AIO support.
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2009 IBM, Corp.
 | 
			
		||||
 * Copyright (C) 2009 Red Hat, Inc.
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU GPL, version 2 or later.
 | 
			
		||||
 * See the COPYING file in the top-level directory.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/aio.h"
 | 
			
		||||
#include "qemu/queue.h"
 | 
			
		||||
#include "block/raw-aio.h"
 | 
			
		||||
#include "qemu/event_notifier.h"
 | 
			
		||||
 | 
			
		||||
#include <libaio.h>
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Queue size (per-device).
 | 
			
		||||
 *
 | 
			
		||||
 * XXX: eventually we need to communicate this to the guest and/or make it
 | 
			
		||||
 *      tunable by the guest.  If we get more outstanding requests at a time
 | 
			
		||||
 *      than this we will get EAGAIN from io_submit which is communicated to
 | 
			
		||||
 *      the guest as an I/O error.
 | 
			
		||||
 */
 | 
			
		||||
#define MAX_EVENTS 128
 | 
			
		||||
 | 
			
		||||
#define MAX_QUEUED_IO  128
 | 
			
		||||
 | 
			
		||||
struct qemu_laiocb {
 | 
			
		||||
    BlockDriverAIOCB common;
 | 
			
		||||
    struct qemu_laio_state *ctx;
 | 
			
		||||
    struct iocb iocb;
 | 
			
		||||
    ssize_t ret;
 | 
			
		||||
    size_t nbytes;
 | 
			
		||||
    QEMUIOVector *qiov;
 | 
			
		||||
    bool is_read;
 | 
			
		||||
    QLIST_ENTRY(qemu_laiocb) node;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
typedef struct {
 | 
			
		||||
    struct iocb *iocbs[MAX_QUEUED_IO];
 | 
			
		||||
    int plugged;
 | 
			
		||||
    unsigned int size;
 | 
			
		||||
    unsigned int idx;
 | 
			
		||||
} LaioQueue;
 | 
			
		||||
 | 
			
		||||
struct qemu_laio_state {
 | 
			
		||||
    io_context_t ctx;
 | 
			
		||||
    EventNotifier e;
 | 
			
		||||
 | 
			
		||||
    /* io queue for submit at batch */
 | 
			
		||||
    LaioQueue io_q;
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static inline ssize_t io_event_ret(struct io_event *ev)
 | 
			
		||||
{
 | 
			
		||||
    return (ssize_t)(((uint64_t)ev->res2 << 32) | ev->res);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Completes an AIO request (calls the callback and frees the ACB).
 | 
			
		||||
 */
 | 
			
		||||
static void qemu_laio_process_completion(struct qemu_laio_state *s,
 | 
			
		||||
    struct qemu_laiocb *laiocb)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = laiocb->ret;
 | 
			
		||||
    if (ret != -ECANCELED) {
 | 
			
		||||
        if (ret == laiocb->nbytes) {
 | 
			
		||||
            ret = 0;
 | 
			
		||||
        } else if (ret >= 0) {
 | 
			
		||||
            /* Short reads mean EOF, pad with zeros. */
 | 
			
		||||
            if (laiocb->is_read) {
 | 
			
		||||
                qemu_iovec_memset(laiocb->qiov, ret, 0,
 | 
			
		||||
                    laiocb->qiov->size - ret);
 | 
			
		||||
            } else {
 | 
			
		||||
                ret = -EINVAL;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        laiocb->common.cb(laiocb->common.opaque, ret);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_aio_release(laiocb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qemu_laio_completion_cb(EventNotifier *e)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = container_of(e, struct qemu_laio_state, e);
 | 
			
		||||
 | 
			
		||||
    while (event_notifier_test_and_clear(&s->e)) {
 | 
			
		||||
        struct io_event events[MAX_EVENTS];
 | 
			
		||||
        struct timespec ts = { 0 };
 | 
			
		||||
        int nevents, i;
 | 
			
		||||
 | 
			
		||||
        do {
 | 
			
		||||
            nevents = io_getevents(s->ctx, MAX_EVENTS, MAX_EVENTS, events, &ts);
 | 
			
		||||
        } while (nevents == -EINTR);
 | 
			
		||||
 | 
			
		||||
        for (i = 0; i < nevents; i++) {
 | 
			
		||||
            struct iocb *iocb = events[i].obj;
 | 
			
		||||
            struct qemu_laiocb *laiocb =
 | 
			
		||||
                    container_of(iocb, struct qemu_laiocb, iocb);
 | 
			
		||||
 | 
			
		||||
            laiocb->ret = io_event_ret(&events[i]);
 | 
			
		||||
            qemu_laio_process_completion(s, laiocb);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void laio_cancel(BlockDriverAIOCB *blockacb)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laiocb *laiocb = (struct qemu_laiocb *)blockacb;
 | 
			
		||||
    struct io_event event;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    if (laiocb->ret != -EINPROGRESS)
 | 
			
		||||
        return;
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * Note that as of Linux 2.6.31 neither the block device code nor any
 | 
			
		||||
     * filesystem implements cancellation of AIO request.
 | 
			
		||||
     * Thus the polling loop below is the normal code path.
 | 
			
		||||
     */
 | 
			
		||||
    ret = io_cancel(laiocb->ctx->ctx, &laiocb->iocb, &event);
 | 
			
		||||
    if (ret == 0) {
 | 
			
		||||
        laiocb->ret = -ECANCELED;
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /*
 | 
			
		||||
     * We have to wait for the iocb to finish.
 | 
			
		||||
     *
 | 
			
		||||
     * The only way to get the iocb status update is by polling the io context.
 | 
			
		||||
     * We might be able to do this slightly more optimal by removing the
 | 
			
		||||
     * O_NONBLOCK flag.
 | 
			
		||||
     */
 | 
			
		||||
    while (laiocb->ret == -EINPROGRESS) {
 | 
			
		||||
        qemu_laio_completion_cb(&laiocb->ctx->e);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const AIOCBInfo laio_aiocb_info = {
 | 
			
		||||
    .aiocb_size         = sizeof(struct qemu_laiocb),
 | 
			
		||||
    .cancel             = laio_cancel,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void ioq_init(LaioQueue *io_q)
 | 
			
		||||
{
 | 
			
		||||
    io_q->size = MAX_QUEUED_IO;
 | 
			
		||||
    io_q->idx = 0;
 | 
			
		||||
    io_q->plugged = 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int ioq_submit(struct qemu_laio_state *s)
 | 
			
		||||
{
 | 
			
		||||
    int ret, i = 0;
 | 
			
		||||
    int len = s->io_q.idx;
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        ret = io_submit(s->ctx, len, s->io_q.iocbs);
 | 
			
		||||
    } while (i++ < 3 && ret == -EAGAIN);
 | 
			
		||||
 | 
			
		||||
    /* empty io queue */
 | 
			
		||||
    s->io_q.idx = 0;
 | 
			
		||||
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        i = 0;
 | 
			
		||||
    } else {
 | 
			
		||||
        i = ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (; i < len; i++) {
 | 
			
		||||
        struct qemu_laiocb *laiocb =
 | 
			
		||||
            container_of(s->io_q.iocbs[i], struct qemu_laiocb, iocb);
 | 
			
		||||
 | 
			
		||||
        laiocb->ret = (ret < 0) ? ret : -EIO;
 | 
			
		||||
        qemu_laio_process_completion(s, laiocb);
 | 
			
		||||
    }
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void ioq_enqueue(struct qemu_laio_state *s, struct iocb *iocb)
 | 
			
		||||
{
 | 
			
		||||
    unsigned int idx = s->io_q.idx;
 | 
			
		||||
 | 
			
		||||
    s->io_q.iocbs[idx++] = iocb;
 | 
			
		||||
    s->io_q.idx = idx;
 | 
			
		||||
 | 
			
		||||
    /* submit immediately if queue is full */
 | 
			
		||||
    if (idx == s->io_q.size) {
 | 
			
		||||
        ioq_submit(s);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void laio_io_plug(BlockDriverState *bs, void *aio_ctx)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = aio_ctx;
 | 
			
		||||
 | 
			
		||||
    s->io_q.plugged++;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int laio_io_unplug(BlockDriverState *bs, void *aio_ctx, bool unplug)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = aio_ctx;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
 | 
			
		||||
    assert(s->io_q.plugged > 0 || !unplug);
 | 
			
		||||
 | 
			
		||||
    if (unplug && --s->io_q.plugged > 0) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (s->io_q.idx > 0) {
 | 
			
		||||
        ret = ioq_submit(s);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockDriverAIOCB *laio_submit(BlockDriverState *bs, void *aio_ctx, int fd,
 | 
			
		||||
        int64_t sector_num, QEMUIOVector *qiov, int nb_sectors,
 | 
			
		||||
        BlockDriverCompletionFunc *cb, void *opaque, int type)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = aio_ctx;
 | 
			
		||||
    struct qemu_laiocb *laiocb;
 | 
			
		||||
    struct iocb *iocbs;
 | 
			
		||||
    off_t offset = sector_num * 512;
 | 
			
		||||
 | 
			
		||||
    laiocb = qemu_aio_get(&laio_aiocb_info, bs, cb, opaque);
 | 
			
		||||
    laiocb->nbytes = nb_sectors * 512;
 | 
			
		||||
    laiocb->ctx = s;
 | 
			
		||||
    laiocb->ret = -EINPROGRESS;
 | 
			
		||||
    laiocb->is_read = (type == QEMU_AIO_READ);
 | 
			
		||||
    laiocb->qiov = qiov;
 | 
			
		||||
 | 
			
		||||
    iocbs = &laiocb->iocb;
 | 
			
		||||
 | 
			
		||||
    switch (type) {
 | 
			
		||||
    case QEMU_AIO_WRITE:
 | 
			
		||||
        io_prep_pwritev(iocbs, fd, qiov->iov, qiov->niov, offset);
 | 
			
		||||
	break;
 | 
			
		||||
    case QEMU_AIO_READ:
 | 
			
		||||
        io_prep_preadv(iocbs, fd, qiov->iov, qiov->niov, offset);
 | 
			
		||||
	break;
 | 
			
		||||
    /* Currently Linux kernel does not support other operations */
 | 
			
		||||
    default:
 | 
			
		||||
        fprintf(stderr, "%s: invalid AIO request type 0x%x.\n",
 | 
			
		||||
                        __func__, type);
 | 
			
		||||
        goto out_free_aiocb;
 | 
			
		||||
    }
 | 
			
		||||
    io_set_eventfd(&laiocb->iocb, event_notifier_get_fd(&s->e));
 | 
			
		||||
 | 
			
		||||
    if (!s->io_q.plugged) {
 | 
			
		||||
        if (io_submit(s->ctx, 1, &iocbs) < 0) {
 | 
			
		||||
            goto out_free_aiocb;
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        ioq_enqueue(s, iocbs);
 | 
			
		||||
    }
 | 
			
		||||
    return &laiocb->common;
 | 
			
		||||
 | 
			
		||||
out_free_aiocb:
 | 
			
		||||
    qemu_aio_release(laiocb);
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void laio_detach_aio_context(void *s_, AioContext *old_context)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = s_;
 | 
			
		||||
 | 
			
		||||
    aio_set_event_notifier(old_context, &s->e, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void laio_attach_aio_context(void *s_, AioContext *new_context)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = s_;
 | 
			
		||||
 | 
			
		||||
    aio_set_event_notifier(new_context, &s->e, qemu_laio_completion_cb);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void *laio_init(void)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s;
 | 
			
		||||
 | 
			
		||||
    s = g_malloc0(sizeof(*s));
 | 
			
		||||
    if (event_notifier_init(&s->e, false) < 0) {
 | 
			
		||||
        goto out_free_state;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (io_setup(MAX_EVENTS, &s->ctx) != 0) {
 | 
			
		||||
        goto out_close_efd;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ioq_init(&s->io_q);
 | 
			
		||||
 | 
			
		||||
    return s;
 | 
			
		||||
 | 
			
		||||
out_close_efd:
 | 
			
		||||
    event_notifier_cleanup(&s->e);
 | 
			
		||||
out_free_state:
 | 
			
		||||
    g_free(s);
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void laio_cleanup(void *s_)
 | 
			
		||||
{
 | 
			
		||||
    struct qemu_laio_state *s = s_;
 | 
			
		||||
 | 
			
		||||
    event_notifier_cleanup(&s->e);
 | 
			
		||||
 | 
			
		||||
    if (io_destroy(s->ctx) != 0) {
 | 
			
		||||
        fprintf(stderr, "%s: destroy AIO context %p failed\n",
 | 
			
		||||
                        __func__, &s->ctx);
 | 
			
		||||
    }
 | 
			
		||||
    g_free(s);
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										744
									
								
								block/mirror.c
									
									
									
									
									
								
							
							
						
						
									
										744
									
								
								block/mirror.c
									
									
									
									
									
								
							@@ -1,744 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Image mirroring
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright Red Hat, Inc. 2012
 | 
			
		||||
 *
 | 
			
		||||
 * Authors:
 | 
			
		||||
 *  Paolo Bonzini  <pbonzini@redhat.com>
 | 
			
		||||
 *
 | 
			
		||||
 * This work is licensed under the terms of the GNU LGPL, version 2 or later.
 | 
			
		||||
 * See the COPYING.LIB file in the top-level directory.
 | 
			
		||||
 *
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "trace.h"
 | 
			
		||||
#include "block/blockjob.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/ratelimit.h"
 | 
			
		||||
#include "qemu/bitmap.h"
 | 
			
		||||
 | 
			
		||||
#define SLICE_TIME    100000000ULL /* ns */
 | 
			
		||||
#define MAX_IN_FLIGHT 16
 | 
			
		||||
 | 
			
		||||
/* The mirroring buffer is a list of granularity-sized chunks.
 | 
			
		||||
 * Free chunks are organized in a list.
 | 
			
		||||
 */
 | 
			
		||||
typedef struct MirrorBuffer {
 | 
			
		||||
    QSIMPLEQ_ENTRY(MirrorBuffer) next;
 | 
			
		||||
} MirrorBuffer;
 | 
			
		||||
 | 
			
		||||
typedef struct MirrorBlockJob {
 | 
			
		||||
    BlockJob common;
 | 
			
		||||
    RateLimit limit;
 | 
			
		||||
    BlockDriverState *target;
 | 
			
		||||
    BlockDriverState *base;
 | 
			
		||||
    /* The name of the graph node to replace */
 | 
			
		||||
    char *replaces;
 | 
			
		||||
    /* The BDS to replace */
 | 
			
		||||
    BlockDriverState *to_replace;
 | 
			
		||||
    /* Used to block operations on the drive-mirror-replace target */
 | 
			
		||||
    Error *replace_blocker;
 | 
			
		||||
    bool is_none_mode;
 | 
			
		||||
    BlockdevOnError on_source_error, on_target_error;
 | 
			
		||||
    bool synced;
 | 
			
		||||
    bool should_complete;
 | 
			
		||||
    int64_t sector_num;
 | 
			
		||||
    int64_t granularity;
 | 
			
		||||
    size_t buf_size;
 | 
			
		||||
    unsigned long *cow_bitmap;
 | 
			
		||||
    BdrvDirtyBitmap *dirty_bitmap;
 | 
			
		||||
    HBitmapIter hbi;
 | 
			
		||||
    uint8_t *buf;
 | 
			
		||||
    QSIMPLEQ_HEAD(, MirrorBuffer) buf_free;
 | 
			
		||||
    int buf_free_count;
 | 
			
		||||
 | 
			
		||||
    unsigned long *in_flight_bitmap;
 | 
			
		||||
    int in_flight;
 | 
			
		||||
    int ret;
 | 
			
		||||
} MirrorBlockJob;
 | 
			
		||||
 | 
			
		||||
typedef struct MirrorOp {
 | 
			
		||||
    MirrorBlockJob *s;
 | 
			
		||||
    QEMUIOVector qiov;
 | 
			
		||||
    int64_t sector_num;
 | 
			
		||||
    int nb_sectors;
 | 
			
		||||
} MirrorOp;
 | 
			
		||||
 | 
			
		||||
static BlockErrorAction mirror_error_action(MirrorBlockJob *s, bool read,
 | 
			
		||||
                                            int error)
 | 
			
		||||
{
 | 
			
		||||
    s->synced = false;
 | 
			
		||||
    if (read) {
 | 
			
		||||
        return block_job_error_action(&s->common, s->common.bs,
 | 
			
		||||
                                      s->on_source_error, true, error);
 | 
			
		||||
    } else {
 | 
			
		||||
        return block_job_error_action(&s->common, s->target,
 | 
			
		||||
                                      s->on_target_error, false, error);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_iteration_done(MirrorOp *op, int ret)
 | 
			
		||||
{
 | 
			
		||||
    MirrorBlockJob *s = op->s;
 | 
			
		||||
    struct iovec *iov;
 | 
			
		||||
    int64_t chunk_num;
 | 
			
		||||
    int i, nb_chunks, sectors_per_chunk;
 | 
			
		||||
 | 
			
		||||
    trace_mirror_iteration_done(s, op->sector_num, op->nb_sectors, ret);
 | 
			
		||||
 | 
			
		||||
    s->in_flight--;
 | 
			
		||||
    iov = op->qiov.iov;
 | 
			
		||||
    for (i = 0; i < op->qiov.niov; i++) {
 | 
			
		||||
        MirrorBuffer *buf = (MirrorBuffer *) iov[i].iov_base;
 | 
			
		||||
        QSIMPLEQ_INSERT_TAIL(&s->buf_free, buf, next);
 | 
			
		||||
        s->buf_free_count++;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    sectors_per_chunk = s->granularity >> BDRV_SECTOR_BITS;
 | 
			
		||||
    chunk_num = op->sector_num / sectors_per_chunk;
 | 
			
		||||
    nb_chunks = op->nb_sectors / sectors_per_chunk;
 | 
			
		||||
    bitmap_clear(s->in_flight_bitmap, chunk_num, nb_chunks);
 | 
			
		||||
    if (s->cow_bitmap && ret >= 0) {
 | 
			
		||||
        bitmap_set(s->cow_bitmap, chunk_num, nb_chunks);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_iovec_destroy(&op->qiov);
 | 
			
		||||
    g_slice_free(MirrorOp, op);
 | 
			
		||||
 | 
			
		||||
    /* Enter coroutine when it is not sleeping.  The coroutine sleeps to
 | 
			
		||||
     * rate-limit itself.  The coroutine will eventually resume since there is
 | 
			
		||||
     * a sleep timeout so don't wake it early.
 | 
			
		||||
     */
 | 
			
		||||
    if (s->common.busy) {
 | 
			
		||||
        qemu_coroutine_enter(s->common.co, NULL);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_write_complete(void *opaque, int ret)
 | 
			
		||||
{
 | 
			
		||||
    MirrorOp *op = opaque;
 | 
			
		||||
    MirrorBlockJob *s = op->s;
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        BlockDriverState *source = s->common.bs;
 | 
			
		||||
        BlockErrorAction action;
 | 
			
		||||
 | 
			
		||||
        bdrv_set_dirty(source, op->sector_num, op->nb_sectors);
 | 
			
		||||
        action = mirror_error_action(s, false, -ret);
 | 
			
		||||
        if (action == BLOCK_ERROR_ACTION_REPORT && s->ret >= 0) {
 | 
			
		||||
            s->ret = ret;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    mirror_iteration_done(op, ret);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_read_complete(void *opaque, int ret)
 | 
			
		||||
{
 | 
			
		||||
    MirrorOp *op = opaque;
 | 
			
		||||
    MirrorBlockJob *s = op->s;
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        BlockDriverState *source = s->common.bs;
 | 
			
		||||
        BlockErrorAction action;
 | 
			
		||||
 | 
			
		||||
        bdrv_set_dirty(source, op->sector_num, op->nb_sectors);
 | 
			
		||||
        action = mirror_error_action(s, true, -ret);
 | 
			
		||||
        if (action == BLOCK_ERROR_ACTION_REPORT && s->ret >= 0) {
 | 
			
		||||
            s->ret = ret;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        mirror_iteration_done(op, ret);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    bdrv_aio_writev(s->target, op->sector_num, &op->qiov, op->nb_sectors,
 | 
			
		||||
                    mirror_write_complete, op);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static uint64_t coroutine_fn mirror_iteration(MirrorBlockJob *s)
 | 
			
		||||
{
 | 
			
		||||
    BlockDriverState *source = s->common.bs;
 | 
			
		||||
    int nb_sectors, sectors_per_chunk, nb_chunks;
 | 
			
		||||
    int64_t end, sector_num, next_chunk, next_sector, hbitmap_next_sector;
 | 
			
		||||
    uint64_t delay_ns;
 | 
			
		||||
    MirrorOp *op;
 | 
			
		||||
 | 
			
		||||
    s->sector_num = hbitmap_iter_next(&s->hbi);
 | 
			
		||||
    if (s->sector_num < 0) {
 | 
			
		||||
        bdrv_dirty_iter_init(source, s->dirty_bitmap, &s->hbi);
 | 
			
		||||
        s->sector_num = hbitmap_iter_next(&s->hbi);
 | 
			
		||||
        trace_mirror_restart_iter(s,
 | 
			
		||||
                                  bdrv_get_dirty_count(source, s->dirty_bitmap));
 | 
			
		||||
        assert(s->sector_num >= 0);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    hbitmap_next_sector = s->sector_num;
 | 
			
		||||
    sector_num = s->sector_num;
 | 
			
		||||
    sectors_per_chunk = s->granularity >> BDRV_SECTOR_BITS;
 | 
			
		||||
    end = s->common.len >> BDRV_SECTOR_BITS;
 | 
			
		||||
 | 
			
		||||
    /* Extend the QEMUIOVector to include all adjacent blocks that will
 | 
			
		||||
     * be copied in this operation.
 | 
			
		||||
     *
 | 
			
		||||
     * We have to do this if we have no backing file yet in the destination,
 | 
			
		||||
     * and the cluster size is very large.  Then we need to do COW ourselves.
 | 
			
		||||
     * The first time a cluster is copied, copy it entirely.  Note that,
 | 
			
		||||
     * because both the granularity and the cluster size are powers of two,
 | 
			
		||||
     * the number of sectors to copy cannot exceed one cluster.
 | 
			
		||||
     *
 | 
			
		||||
     * We also want to extend the QEMUIOVector to include more adjacent
 | 
			
		||||
     * dirty blocks if possible, to limit the number of I/O operations and
 | 
			
		||||
     * run efficiently even with a small granularity.
 | 
			
		||||
     */
 | 
			
		||||
    nb_chunks = 0;
 | 
			
		||||
    nb_sectors = 0;
 | 
			
		||||
    next_sector = sector_num;
 | 
			
		||||
    next_chunk = sector_num / sectors_per_chunk;
 | 
			
		||||
 | 
			
		||||
    /* Wait for I/O to this cluster (from a previous iteration) to be done.  */
 | 
			
		||||
    while (test_bit(next_chunk, s->in_flight_bitmap)) {
 | 
			
		||||
        trace_mirror_yield_in_flight(s, sector_num, s->in_flight);
 | 
			
		||||
        qemu_coroutine_yield();
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    do {
 | 
			
		||||
        int added_sectors, added_chunks;
 | 
			
		||||
 | 
			
		||||
        if (!bdrv_get_dirty(source, s->dirty_bitmap, next_sector) ||
 | 
			
		||||
            test_bit(next_chunk, s->in_flight_bitmap)) {
 | 
			
		||||
            assert(nb_sectors > 0);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        added_sectors = sectors_per_chunk;
 | 
			
		||||
        if (s->cow_bitmap && !test_bit(next_chunk, s->cow_bitmap)) {
 | 
			
		||||
            bdrv_round_to_clusters(s->target,
 | 
			
		||||
                                   next_sector, added_sectors,
 | 
			
		||||
                                   &next_sector, &added_sectors);
 | 
			
		||||
 | 
			
		||||
            /* On the first iteration, the rounding may make us copy
 | 
			
		||||
             * sectors before the first dirty one.
 | 
			
		||||
             */
 | 
			
		||||
            if (next_sector < sector_num) {
 | 
			
		||||
                assert(nb_sectors == 0);
 | 
			
		||||
                sector_num = next_sector;
 | 
			
		||||
                next_chunk = next_sector / sectors_per_chunk;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        added_sectors = MIN(added_sectors, end - (sector_num + nb_sectors));
 | 
			
		||||
        added_chunks = (added_sectors + sectors_per_chunk - 1) / sectors_per_chunk;
 | 
			
		||||
 | 
			
		||||
        /* When doing COW, it may happen that there is not enough space for
 | 
			
		||||
         * a full cluster.  Wait if that is the case.
 | 
			
		||||
         */
 | 
			
		||||
        while (nb_chunks == 0 && s->buf_free_count < added_chunks) {
 | 
			
		||||
            trace_mirror_yield_buf_busy(s, nb_chunks, s->in_flight);
 | 
			
		||||
            qemu_coroutine_yield();
 | 
			
		||||
        }
 | 
			
		||||
        if (s->buf_free_count < nb_chunks + added_chunks) {
 | 
			
		||||
            trace_mirror_break_buf_busy(s, nb_chunks, s->in_flight);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* We have enough free space to copy these sectors.  */
 | 
			
		||||
        bitmap_set(s->in_flight_bitmap, next_chunk, added_chunks);
 | 
			
		||||
 | 
			
		||||
        nb_sectors += added_sectors;
 | 
			
		||||
        nb_chunks += added_chunks;
 | 
			
		||||
        next_sector += added_sectors;
 | 
			
		||||
        next_chunk += added_chunks;
 | 
			
		||||
        if (!s->synced && s->common.speed) {
 | 
			
		||||
            delay_ns = ratelimit_calculate_delay(&s->limit, added_sectors);
 | 
			
		||||
        } else {
 | 
			
		||||
            delay_ns = 0;
 | 
			
		||||
        }
 | 
			
		||||
    } while (delay_ns == 0 && next_sector < end);
 | 
			
		||||
 | 
			
		||||
    /* Allocate a MirrorOp that is used as an AIO callback.  */
 | 
			
		||||
    op = g_slice_new(MirrorOp);
 | 
			
		||||
    op->s = s;
 | 
			
		||||
    op->sector_num = sector_num;
 | 
			
		||||
    op->nb_sectors = nb_sectors;
 | 
			
		||||
 | 
			
		||||
    /* Now make a QEMUIOVector taking enough granularity-sized chunks
 | 
			
		||||
     * from s->buf_free.
 | 
			
		||||
     */
 | 
			
		||||
    qemu_iovec_init(&op->qiov, nb_chunks);
 | 
			
		||||
    next_sector = sector_num;
 | 
			
		||||
    while (nb_chunks-- > 0) {
 | 
			
		||||
        MirrorBuffer *buf = QSIMPLEQ_FIRST(&s->buf_free);
 | 
			
		||||
        size_t remaining = (nb_sectors * BDRV_SECTOR_SIZE) - op->qiov.size;
 | 
			
		||||
 | 
			
		||||
        QSIMPLEQ_REMOVE_HEAD(&s->buf_free, next);
 | 
			
		||||
        s->buf_free_count--;
 | 
			
		||||
        qemu_iovec_add(&op->qiov, buf, MIN(s->granularity, remaining));
 | 
			
		||||
 | 
			
		||||
        /* Advance the HBitmapIter in parallel, so that we do not examine
 | 
			
		||||
         * the same sector twice.
 | 
			
		||||
         */
 | 
			
		||||
        if (next_sector > hbitmap_next_sector
 | 
			
		||||
            && bdrv_get_dirty(source, s->dirty_bitmap, next_sector)) {
 | 
			
		||||
            hbitmap_next_sector = hbitmap_iter_next(&s->hbi);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        next_sector += sectors_per_chunk;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bdrv_reset_dirty(source, sector_num, nb_sectors);
 | 
			
		||||
 | 
			
		||||
    /* Copy the dirty cluster.  */
 | 
			
		||||
    s->in_flight++;
 | 
			
		||||
    trace_mirror_one_iteration(s, sector_num, nb_sectors);
 | 
			
		||||
    bdrv_aio_readv(source, sector_num, &op->qiov, nb_sectors,
 | 
			
		||||
                   mirror_read_complete, op);
 | 
			
		||||
    return delay_ns;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_free_init(MirrorBlockJob *s)
 | 
			
		||||
{
 | 
			
		||||
    int granularity = s->granularity;
 | 
			
		||||
    size_t buf_size = s->buf_size;
 | 
			
		||||
    uint8_t *buf = s->buf;
 | 
			
		||||
 | 
			
		||||
    assert(s->buf_free_count == 0);
 | 
			
		||||
    QSIMPLEQ_INIT(&s->buf_free);
 | 
			
		||||
    while (buf_size != 0) {
 | 
			
		||||
        MirrorBuffer *cur = (MirrorBuffer *)buf;
 | 
			
		||||
        QSIMPLEQ_INSERT_TAIL(&s->buf_free, cur, next);
 | 
			
		||||
        s->buf_free_count++;
 | 
			
		||||
        buf_size -= granularity;
 | 
			
		||||
        buf += granularity;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_drain(MirrorBlockJob *s)
 | 
			
		||||
{
 | 
			
		||||
    while (s->in_flight > 0) {
 | 
			
		||||
        qemu_coroutine_yield();
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void coroutine_fn mirror_run(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    MirrorBlockJob *s = opaque;
 | 
			
		||||
    BlockDriverState *bs = s->common.bs;
 | 
			
		||||
    int64_t sector_num, end, sectors_per_chunk, length;
 | 
			
		||||
    uint64_t last_pause_ns;
 | 
			
		||||
    BlockDriverInfo bdi;
 | 
			
		||||
    char backing_filename[1024];
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    int n;
 | 
			
		||||
 | 
			
		||||
    if (block_job_is_cancelled(&s->common)) {
 | 
			
		||||
        goto immediate_exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->common.len = bdrv_getlength(bs);
 | 
			
		||||
    if (s->common.len < 0) {
 | 
			
		||||
        ret = s->common.len;
 | 
			
		||||
        goto immediate_exit;
 | 
			
		||||
    } else if (s->common.len == 0) {
 | 
			
		||||
        /* Report BLOCK_JOB_READY and wait for complete. */
 | 
			
		||||
        block_job_event_ready(&s->common);
 | 
			
		||||
        s->synced = true;
 | 
			
		||||
        while (!block_job_is_cancelled(&s->common) && !s->should_complete) {
 | 
			
		||||
            block_job_yield(&s->common);
 | 
			
		||||
        }
 | 
			
		||||
        s->common.cancelled = false;
 | 
			
		||||
        goto immediate_exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    length = DIV_ROUND_UP(s->common.len, s->granularity);
 | 
			
		||||
    s->in_flight_bitmap = bitmap_new(length);
 | 
			
		||||
 | 
			
		||||
    /* If we have no backing file yet in the destination, we cannot let
 | 
			
		||||
     * the destination do COW.  Instead, we copy sectors around the
 | 
			
		||||
     * dirty data if needed.  We need a bitmap to do that.
 | 
			
		||||
     */
 | 
			
		||||
    bdrv_get_backing_filename(s->target, backing_filename,
 | 
			
		||||
                              sizeof(backing_filename));
 | 
			
		||||
    if (backing_filename[0] && !s->target->backing_hd) {
 | 
			
		||||
        ret = bdrv_get_info(s->target, &bdi);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            goto immediate_exit;
 | 
			
		||||
        }
 | 
			
		||||
        if (s->granularity < bdi.cluster_size) {
 | 
			
		||||
            s->buf_size = MAX(s->buf_size, bdi.cluster_size);
 | 
			
		||||
            s->cow_bitmap = bitmap_new(length);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    end = s->common.len >> BDRV_SECTOR_BITS;
 | 
			
		||||
    s->buf = qemu_blockalign(bs, s->buf_size);
 | 
			
		||||
    sectors_per_chunk = s->granularity >> BDRV_SECTOR_BITS;
 | 
			
		||||
    mirror_free_init(s);
 | 
			
		||||
 | 
			
		||||
    if (!s->is_none_mode) {
 | 
			
		||||
        /* First part, loop on the sectors and initialize the dirty bitmap.  */
 | 
			
		||||
        BlockDriverState *base = s->base;
 | 
			
		||||
        for (sector_num = 0; sector_num < end; ) {
 | 
			
		||||
            int64_t next = (sector_num | (sectors_per_chunk - 1)) + 1;
 | 
			
		||||
            ret = bdrv_is_allocated_above(bs, base,
 | 
			
		||||
                                          sector_num, next - sector_num, &n);
 | 
			
		||||
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                goto immediate_exit;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            assert(n > 0);
 | 
			
		||||
            if (ret == 1) {
 | 
			
		||||
                bdrv_set_dirty(bs, sector_num, n);
 | 
			
		||||
                sector_num = next;
 | 
			
		||||
            } else {
 | 
			
		||||
                sector_num += n;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bdrv_dirty_iter_init(bs, s->dirty_bitmap, &s->hbi);
 | 
			
		||||
    last_pause_ns = qemu_clock_get_ns(QEMU_CLOCK_REALTIME);
 | 
			
		||||
    for (;;) {
 | 
			
		||||
        uint64_t delay_ns = 0;
 | 
			
		||||
        int64_t cnt;
 | 
			
		||||
        bool should_complete;
 | 
			
		||||
 | 
			
		||||
        if (s->ret < 0) {
 | 
			
		||||
            ret = s->ret;
 | 
			
		||||
            goto immediate_exit;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        cnt = bdrv_get_dirty_count(bs, s->dirty_bitmap);
 | 
			
		||||
 | 
			
		||||
        /* Note that even when no rate limit is applied we need to yield
 | 
			
		||||
         * periodically with no pending I/O so that qemu_aio_flush() returns.
 | 
			
		||||
         * We do so every SLICE_TIME nanoseconds, or when there is an error,
 | 
			
		||||
         * or when the source is clean, whichever comes first.
 | 
			
		||||
         */
 | 
			
		||||
        if (qemu_clock_get_ns(QEMU_CLOCK_REALTIME) - last_pause_ns < SLICE_TIME &&
 | 
			
		||||
            s->common.iostatus == BLOCK_DEVICE_IO_STATUS_OK) {
 | 
			
		||||
            if (s->in_flight == MAX_IN_FLIGHT || s->buf_free_count == 0 ||
 | 
			
		||||
                (cnt == 0 && s->in_flight > 0)) {
 | 
			
		||||
                trace_mirror_yield(s, s->in_flight, s->buf_free_count, cnt);
 | 
			
		||||
                qemu_coroutine_yield();
 | 
			
		||||
                continue;
 | 
			
		||||
            } else if (cnt != 0) {
 | 
			
		||||
                delay_ns = mirror_iteration(s);
 | 
			
		||||
                if (delay_ns == 0) {
 | 
			
		||||
                    continue;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        should_complete = false;
 | 
			
		||||
        if (s->in_flight == 0 && cnt == 0) {
 | 
			
		||||
            trace_mirror_before_flush(s);
 | 
			
		||||
            ret = bdrv_flush(s->target);
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                if (mirror_error_action(s, false, -ret) ==
 | 
			
		||||
                    BLOCK_ERROR_ACTION_REPORT) {
 | 
			
		||||
                    goto immediate_exit;
 | 
			
		||||
                }
 | 
			
		||||
            } else {
 | 
			
		||||
                /* We're out of the streaming phase.  From now on, if the job
 | 
			
		||||
                 * is cancelled we will actually complete all pending I/O and
 | 
			
		||||
                 * report completion.  This way, block-job-cancel will leave
 | 
			
		||||
                 * the target in a consistent state.
 | 
			
		||||
                 */
 | 
			
		||||
                s->common.offset = end * BDRV_SECTOR_SIZE;
 | 
			
		||||
                if (!s->synced) {
 | 
			
		||||
                    block_job_event_ready(&s->common);
 | 
			
		||||
                    s->synced = true;
 | 
			
		||||
                }
 | 
			
		||||
 | 
			
		||||
                should_complete = s->should_complete ||
 | 
			
		||||
                    block_job_is_cancelled(&s->common);
 | 
			
		||||
                cnt = bdrv_get_dirty_count(bs, s->dirty_bitmap);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (cnt == 0 && should_complete) {
 | 
			
		||||
            /* The dirty bitmap is not updated while operations are pending.
 | 
			
		||||
             * If we're about to exit, wait for pending operations before
 | 
			
		||||
             * calling bdrv_get_dirty_count(bs), or we may exit while the
 | 
			
		||||
             * source has dirty data to copy!
 | 
			
		||||
             *
 | 
			
		||||
             * Note that I/O can be submitted by the guest while
 | 
			
		||||
             * mirror_populate runs.
 | 
			
		||||
             */
 | 
			
		||||
            trace_mirror_before_drain(s, cnt);
 | 
			
		||||
            bdrv_drain_all();
 | 
			
		||||
            cnt = bdrv_get_dirty_count(bs, s->dirty_bitmap);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        ret = 0;
 | 
			
		||||
        trace_mirror_before_sleep(s, cnt, s->synced, delay_ns);
 | 
			
		||||
        if (!s->synced) {
 | 
			
		||||
            /* Publish progress */
 | 
			
		||||
            s->common.offset = (end - cnt) * BDRV_SECTOR_SIZE;
 | 
			
		||||
            block_job_sleep_ns(&s->common, QEMU_CLOCK_REALTIME, delay_ns);
 | 
			
		||||
            if (block_job_is_cancelled(&s->common)) {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
        } else if (!should_complete) {
 | 
			
		||||
            delay_ns = (s->in_flight == 0 && cnt == 0 ? SLICE_TIME : 0);
 | 
			
		||||
            block_job_sleep_ns(&s->common, QEMU_CLOCK_REALTIME, delay_ns);
 | 
			
		||||
        } else if (cnt == 0) {
 | 
			
		||||
            /* The two disks are in sync.  Exit and report successful
 | 
			
		||||
             * completion.
 | 
			
		||||
             */
 | 
			
		||||
            assert(QLIST_EMPTY(&bs->tracked_requests));
 | 
			
		||||
            s->common.cancelled = false;
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        last_pause_ns = qemu_clock_get_ns(QEMU_CLOCK_REALTIME);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
immediate_exit:
 | 
			
		||||
    if (s->in_flight > 0) {
 | 
			
		||||
        /* We get here only if something went wrong.  Either the job failed,
 | 
			
		||||
         * or it was cancelled prematurely so that we do not guarantee that
 | 
			
		||||
         * the target is a copy of the source.
 | 
			
		||||
         */
 | 
			
		||||
        assert(ret < 0 || (!s->synced && block_job_is_cancelled(&s->common)));
 | 
			
		||||
        mirror_drain(s);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    assert(s->in_flight == 0);
 | 
			
		||||
    qemu_vfree(s->buf);
 | 
			
		||||
    g_free(s->cow_bitmap);
 | 
			
		||||
    g_free(s->in_flight_bitmap);
 | 
			
		||||
    bdrv_release_dirty_bitmap(bs, s->dirty_bitmap);
 | 
			
		||||
    bdrv_iostatus_disable(s->target);
 | 
			
		||||
    if (s->should_complete && ret == 0) {
 | 
			
		||||
        BlockDriverState *to_replace = s->common.bs;
 | 
			
		||||
        if (s->to_replace) {
 | 
			
		||||
            to_replace = s->to_replace;
 | 
			
		||||
        }
 | 
			
		||||
        if (bdrv_get_flags(s->target) != bdrv_get_flags(to_replace)) {
 | 
			
		||||
            bdrv_reopen(s->target, bdrv_get_flags(to_replace), NULL);
 | 
			
		||||
        }
 | 
			
		||||
        bdrv_swap(s->target, to_replace);
 | 
			
		||||
        if (s->common.driver->job_type == BLOCK_JOB_TYPE_COMMIT) {
 | 
			
		||||
            /* drop the bs loop chain formed by the swap: break the loop then
 | 
			
		||||
             * trigger the unref from the top one */
 | 
			
		||||
            BlockDriverState *p = s->base->backing_hd;
 | 
			
		||||
            bdrv_set_backing_hd(s->base, NULL);
 | 
			
		||||
            bdrv_unref(p);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    if (s->to_replace) {
 | 
			
		||||
        bdrv_op_unblock_all(s->to_replace, s->replace_blocker);
 | 
			
		||||
        error_free(s->replace_blocker);
 | 
			
		||||
        bdrv_unref(s->to_replace);
 | 
			
		||||
    }
 | 
			
		||||
    g_free(s->replaces);
 | 
			
		||||
    bdrv_unref(s->target);
 | 
			
		||||
    block_job_completed(&s->common, ret);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_set_speed(BlockJob *job, int64_t speed, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    MirrorBlockJob *s = container_of(job, MirrorBlockJob, common);
 | 
			
		||||
 | 
			
		||||
    if (speed < 0) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER, "speed");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    ratelimit_set_speed(&s->limit, speed / BDRV_SECTOR_SIZE, SLICE_TIME);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_iostatus_reset(BlockJob *job)
 | 
			
		||||
{
 | 
			
		||||
    MirrorBlockJob *s = container_of(job, MirrorBlockJob, common);
 | 
			
		||||
 | 
			
		||||
    bdrv_iostatus_reset(s->target);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void mirror_complete(BlockJob *job, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    MirrorBlockJob *s = container_of(job, MirrorBlockJob, common);
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_open_backing_file(s->target, NULL, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    if (!s->synced) {
 | 
			
		||||
        error_set(errp, QERR_BLOCK_JOB_NOT_READY, job->bs->device_name);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* check the target bs is not blocked and block all operations on it */
 | 
			
		||||
    if (s->replaces) {
 | 
			
		||||
        s->to_replace = check_to_replace_node(s->replaces, &local_err);
 | 
			
		||||
        if (!s->to_replace) {
 | 
			
		||||
            error_propagate(errp, local_err);
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        error_setg(&s->replace_blocker,
 | 
			
		||||
                   "block device is in use by block-job-complete");
 | 
			
		||||
        bdrv_op_block_all(s->to_replace, s->replace_blocker);
 | 
			
		||||
        bdrv_ref(s->to_replace);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->should_complete = true;
 | 
			
		||||
    block_job_resume(job);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static const BlockJobDriver mirror_job_driver = {
 | 
			
		||||
    .instance_size = sizeof(MirrorBlockJob),
 | 
			
		||||
    .job_type      = BLOCK_JOB_TYPE_MIRROR,
 | 
			
		||||
    .set_speed     = mirror_set_speed,
 | 
			
		||||
    .iostatus_reset= mirror_iostatus_reset,
 | 
			
		||||
    .complete      = mirror_complete,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static const BlockJobDriver commit_active_job_driver = {
 | 
			
		||||
    .instance_size = sizeof(MirrorBlockJob),
 | 
			
		||||
    .job_type      = BLOCK_JOB_TYPE_COMMIT,
 | 
			
		||||
    .set_speed     = mirror_set_speed,
 | 
			
		||||
    .iostatus_reset
 | 
			
		||||
                   = mirror_iostatus_reset,
 | 
			
		||||
    .complete      = mirror_complete,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void mirror_start_job(BlockDriverState *bs, BlockDriverState *target,
 | 
			
		||||
                             const char *replaces,
 | 
			
		||||
                             int64_t speed, int64_t granularity,
 | 
			
		||||
                             int64_t buf_size,
 | 
			
		||||
                             BlockdevOnError on_source_error,
 | 
			
		||||
                             BlockdevOnError on_target_error,
 | 
			
		||||
                             BlockDriverCompletionFunc *cb,
 | 
			
		||||
                             void *opaque, Error **errp,
 | 
			
		||||
                             const BlockJobDriver *driver,
 | 
			
		||||
                             bool is_none_mode, BlockDriverState *base)
 | 
			
		||||
{
 | 
			
		||||
    MirrorBlockJob *s;
 | 
			
		||||
 | 
			
		||||
    if (granularity == 0) {
 | 
			
		||||
        /* Choose the default granularity based on the target file's cluster
 | 
			
		||||
         * size, clamped between 4k and 64k.  */
 | 
			
		||||
        BlockDriverInfo bdi;
 | 
			
		||||
        if (bdrv_get_info(target, &bdi) >= 0 && bdi.cluster_size != 0) {
 | 
			
		||||
            granularity = MAX(4096, bdi.cluster_size);
 | 
			
		||||
            granularity = MIN(65536, granularity);
 | 
			
		||||
        } else {
 | 
			
		||||
            granularity = 65536;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    assert ((granularity & (granularity - 1)) == 0);
 | 
			
		||||
 | 
			
		||||
    if ((on_source_error == BLOCKDEV_ON_ERROR_STOP ||
 | 
			
		||||
         on_source_error == BLOCKDEV_ON_ERROR_ENOSPC) &&
 | 
			
		||||
        !bdrv_iostatus_is_enabled(bs)) {
 | 
			
		||||
        error_set(errp, QERR_INVALID_PARAMETER, "on-source-error");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    s = block_job_create(driver, bs, speed, cb, opaque, errp);
 | 
			
		||||
    if (!s) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->replaces = g_strdup(replaces);
 | 
			
		||||
    s->on_source_error = on_source_error;
 | 
			
		||||
    s->on_target_error = on_target_error;
 | 
			
		||||
    s->target = target;
 | 
			
		||||
    s->is_none_mode = is_none_mode;
 | 
			
		||||
    s->base = base;
 | 
			
		||||
    s->granularity = granularity;
 | 
			
		||||
    s->buf_size = MAX(buf_size, granularity);
 | 
			
		||||
 | 
			
		||||
    s->dirty_bitmap = bdrv_create_dirty_bitmap(bs, granularity, errp);
 | 
			
		||||
    if (!s->dirty_bitmap) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    bdrv_set_enable_write_cache(s->target, true);
 | 
			
		||||
    bdrv_set_on_error(s->target, on_target_error, on_target_error);
 | 
			
		||||
    bdrv_iostatus_enable(s->target);
 | 
			
		||||
    s->common.co = qemu_coroutine_create(mirror_run);
 | 
			
		||||
    trace_mirror_start(bs, s, s->common.co, opaque);
 | 
			
		||||
    qemu_coroutine_enter(s->common.co, s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void mirror_start(BlockDriverState *bs, BlockDriverState *target,
 | 
			
		||||
                  const char *replaces,
 | 
			
		||||
                  int64_t speed, int64_t granularity, int64_t buf_size,
 | 
			
		||||
                  MirrorSyncMode mode, BlockdevOnError on_source_error,
 | 
			
		||||
                  BlockdevOnError on_target_error,
 | 
			
		||||
                  BlockDriverCompletionFunc *cb,
 | 
			
		||||
                  void *opaque, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    bool is_none_mode;
 | 
			
		||||
    BlockDriverState *base;
 | 
			
		||||
 | 
			
		||||
    is_none_mode = mode == MIRROR_SYNC_MODE_NONE;
 | 
			
		||||
    base = mode == MIRROR_SYNC_MODE_TOP ? bs->backing_hd : NULL;
 | 
			
		||||
    mirror_start_job(bs, target, replaces,
 | 
			
		||||
                     speed, granularity, buf_size,
 | 
			
		||||
                     on_source_error, on_target_error, cb, opaque, errp,
 | 
			
		||||
                     &mirror_job_driver, is_none_mode, base);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void commit_active_start(BlockDriverState *bs, BlockDriverState *base,
 | 
			
		||||
                         int64_t speed,
 | 
			
		||||
                         BlockdevOnError on_error,
 | 
			
		||||
                         BlockDriverCompletionFunc *cb,
 | 
			
		||||
                         void *opaque, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int64_t length, base_length;
 | 
			
		||||
    int orig_base_flags;
 | 
			
		||||
    int ret;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    orig_base_flags = bdrv_get_flags(base);
 | 
			
		||||
 | 
			
		||||
    if (bdrv_reopen(base, bs->open_flags, errp)) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    length = bdrv_getlength(bs);
 | 
			
		||||
    if (length < 0) {
 | 
			
		||||
        error_setg_errno(errp, -length,
 | 
			
		||||
                         "Unable to determine length of %s", bs->filename);
 | 
			
		||||
        goto error_restore_flags;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    base_length = bdrv_getlength(base);
 | 
			
		||||
    if (base_length < 0) {
 | 
			
		||||
        error_setg_errno(errp, -base_length,
 | 
			
		||||
                         "Unable to determine length of %s", base->filename);
 | 
			
		||||
        goto error_restore_flags;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (length > base_length) {
 | 
			
		||||
        ret = bdrv_truncate(base, length);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            error_setg_errno(errp, -ret,
 | 
			
		||||
                            "Top image %s is larger than base image %s, and "
 | 
			
		||||
                             "resize of base image failed",
 | 
			
		||||
                             bs->filename, base->filename);
 | 
			
		||||
            goto error_restore_flags;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bdrv_ref(base);
 | 
			
		||||
    mirror_start_job(bs, base, NULL, speed, 0, 0,
 | 
			
		||||
                     on_error, on_error, cb, opaque, &local_err,
 | 
			
		||||
                     &commit_active_job_driver, false, base);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto error_restore_flags;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return;
 | 
			
		||||
 | 
			
		||||
error_restore_flags:
 | 
			
		||||
    /* ignore error and errp for bdrv_reopen, because we want to propagate
 | 
			
		||||
     * the original error */
 | 
			
		||||
    bdrv_reopen(base, orig_base_flags, NULL);
 | 
			
		||||
    return;
 | 
			
		||||
}
 | 
			
		||||
@@ -1,404 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for  NBD
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2008 Bull S.A.S.
 | 
			
		||||
 *     Author: Laurent Vivier <Laurent.Vivier@bull.net>
 | 
			
		||||
 *
 | 
			
		||||
 * Some parts:
 | 
			
		||||
 *    Copyright (C) 2007 Anthony Liguori <anthony@codemonkey.ws>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "nbd-client.h"
 | 
			
		||||
#include "qemu/sockets.h"
 | 
			
		||||
 | 
			
		||||
#define HANDLE_TO_INDEX(bs, handle) ((handle) ^ ((uint64_t)(intptr_t)bs))
 | 
			
		||||
#define INDEX_TO_HANDLE(bs, index)  ((index)  ^ ((uint64_t)(intptr_t)bs))
 | 
			
		||||
 | 
			
		||||
static void nbd_recv_coroutines_enter_all(NbdClientSession *s)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < MAX_NBD_REQUESTS; i++) {
 | 
			
		||||
        if (s->recv_coroutine[i]) {
 | 
			
		||||
            qemu_coroutine_enter(s->recv_coroutine[i], NULL);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_teardown_connection(NbdClientSession *client)
 | 
			
		||||
{
 | 
			
		||||
    /* finish any pending coroutines */
 | 
			
		||||
    shutdown(client->sock, 2);
 | 
			
		||||
    nbd_recv_coroutines_enter_all(client);
 | 
			
		||||
 | 
			
		||||
    nbd_client_session_detach_aio_context(client);
 | 
			
		||||
    closesocket(client->sock);
 | 
			
		||||
    client->sock = -1;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_reply_ready(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    NbdClientSession *s = opaque;
 | 
			
		||||
    uint64_t i;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    if (s->reply.handle == 0) {
 | 
			
		||||
        /* No reply already in flight.  Fetch a header.  It is possible
 | 
			
		||||
         * that another thread has done the same thing in parallel, so
 | 
			
		||||
         * the socket is not readable anymore.
 | 
			
		||||
         */
 | 
			
		||||
        ret = nbd_receive_reply(s->sock, &s->reply);
 | 
			
		||||
        if (ret == -EAGAIN) {
 | 
			
		||||
            return;
 | 
			
		||||
        }
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            s->reply.handle = 0;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* There's no need for a mutex on the receive side, because the
 | 
			
		||||
     * handler acts as a synchronization point and ensures that only
 | 
			
		||||
     * one coroutine is called until the reply finishes.  */
 | 
			
		||||
    i = HANDLE_TO_INDEX(s, s->reply.handle);
 | 
			
		||||
    if (i >= MAX_NBD_REQUESTS) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (s->recv_coroutine[i]) {
 | 
			
		||||
        qemu_coroutine_enter(s->recv_coroutine[i], NULL);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    nbd_teardown_connection(s);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_restart_write(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    NbdClientSession *s = opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_coroutine_enter(s->send_coroutine, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_send_request(NbdClientSession *s,
 | 
			
		||||
    struct nbd_request *request,
 | 
			
		||||
    QEMUIOVector *qiov, int offset)
 | 
			
		||||
{
 | 
			
		||||
    AioContext *aio_context;
 | 
			
		||||
    int rc, ret;
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_lock(&s->send_mutex);
 | 
			
		||||
    s->send_coroutine = qemu_coroutine_self();
 | 
			
		||||
    aio_context = bdrv_get_aio_context(s->bs);
 | 
			
		||||
    aio_set_fd_handler(aio_context, s->sock,
 | 
			
		||||
                       nbd_reply_ready, nbd_restart_write, s);
 | 
			
		||||
    if (qiov) {
 | 
			
		||||
        if (!s->is_unix) {
 | 
			
		||||
            socket_set_cork(s->sock, 1);
 | 
			
		||||
        }
 | 
			
		||||
        rc = nbd_send_request(s->sock, request);
 | 
			
		||||
        if (rc >= 0) {
 | 
			
		||||
            ret = qemu_co_sendv(s->sock, qiov->iov, qiov->niov,
 | 
			
		||||
                                offset, request->len);
 | 
			
		||||
            if (ret != request->len) {
 | 
			
		||||
                rc = -EIO;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        if (!s->is_unix) {
 | 
			
		||||
            socket_set_cork(s->sock, 0);
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        rc = nbd_send_request(s->sock, request);
 | 
			
		||||
    }
 | 
			
		||||
    aio_set_fd_handler(aio_context, s->sock, nbd_reply_ready, NULL, s);
 | 
			
		||||
    s->send_coroutine = NULL;
 | 
			
		||||
    qemu_co_mutex_unlock(&s->send_mutex);
 | 
			
		||||
    return rc;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_co_receive_reply(NbdClientSession *s,
 | 
			
		||||
    struct nbd_request *request, struct nbd_reply *reply,
 | 
			
		||||
    QEMUIOVector *qiov, int offset)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    /* Wait until we're woken up by the read handler.  TODO: perhaps
 | 
			
		||||
     * peek at the next reply and avoid yielding if it's ours?  */
 | 
			
		||||
    qemu_coroutine_yield();
 | 
			
		||||
    *reply = s->reply;
 | 
			
		||||
    if (reply->handle != request->handle) {
 | 
			
		||||
        reply->error = EIO;
 | 
			
		||||
    } else {
 | 
			
		||||
        if (qiov && reply->error == 0) {
 | 
			
		||||
            ret = qemu_co_recvv(s->sock, qiov->iov, qiov->niov,
 | 
			
		||||
                                offset, request->len);
 | 
			
		||||
            if (ret != request->len) {
 | 
			
		||||
                reply->error = EIO;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* Tell the read handler to read another header.  */
 | 
			
		||||
        s->reply.handle = 0;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_coroutine_start(NbdClientSession *s,
 | 
			
		||||
   struct nbd_request *request)
 | 
			
		||||
{
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    /* Poor man semaphore.  The free_sema is locked when no other request
 | 
			
		||||
     * can be accepted, and unlocked after receiving one reply.  */
 | 
			
		||||
    if (s->in_flight >= MAX_NBD_REQUESTS - 1) {
 | 
			
		||||
        qemu_co_mutex_lock(&s->free_sema);
 | 
			
		||||
        assert(s->in_flight < MAX_NBD_REQUESTS);
 | 
			
		||||
    }
 | 
			
		||||
    s->in_flight++;
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < MAX_NBD_REQUESTS; i++) {
 | 
			
		||||
        if (s->recv_coroutine[i] == NULL) {
 | 
			
		||||
            s->recv_coroutine[i] = qemu_coroutine_self();
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    assert(i < MAX_NBD_REQUESTS);
 | 
			
		||||
    request->handle = INDEX_TO_HANDLE(s, i);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_coroutine_end(NbdClientSession *s,
 | 
			
		||||
    struct nbd_request *request)
 | 
			
		||||
{
 | 
			
		||||
    int i = HANDLE_TO_INDEX(s, request->handle);
 | 
			
		||||
    s->recv_coroutine[i] = NULL;
 | 
			
		||||
    if (s->in_flight-- == MAX_NBD_REQUESTS) {
 | 
			
		||||
        qemu_co_mutex_unlock(&s->free_sema);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_readv_1(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
                          int nb_sectors, QEMUIOVector *qiov,
 | 
			
		||||
                          int offset)
 | 
			
		||||
{
 | 
			
		||||
    struct nbd_request request = { .type = NBD_CMD_READ };
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
    ssize_t ret;
 | 
			
		||||
 | 
			
		||||
    request.from = sector_num * 512;
 | 
			
		||||
    request.len = nb_sectors * 512;
 | 
			
		||||
 | 
			
		||||
    nbd_coroutine_start(client, &request);
 | 
			
		||||
    ret = nbd_co_send_request(client, &request, NULL, 0);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        reply.error = -ret;
 | 
			
		||||
    } else {
 | 
			
		||||
        nbd_co_receive_reply(client, &request, &reply, qiov, offset);
 | 
			
		||||
    }
 | 
			
		||||
    nbd_coroutine_end(client, &request);
 | 
			
		||||
    return -reply.error;
 | 
			
		||||
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_writev_1(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
                           int nb_sectors, QEMUIOVector *qiov,
 | 
			
		||||
                           int offset)
 | 
			
		||||
{
 | 
			
		||||
    struct nbd_request request = { .type = NBD_CMD_WRITE };
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
    ssize_t ret;
 | 
			
		||||
 | 
			
		||||
    if (!bdrv_enable_write_cache(client->bs) &&
 | 
			
		||||
        (client->nbdflags & NBD_FLAG_SEND_FUA)) {
 | 
			
		||||
        request.type |= NBD_CMD_FLAG_FUA;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    request.from = sector_num * 512;
 | 
			
		||||
    request.len = nb_sectors * 512;
 | 
			
		||||
 | 
			
		||||
    nbd_coroutine_start(client, &request);
 | 
			
		||||
    ret = nbd_co_send_request(client, &request, qiov, offset);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        reply.error = -ret;
 | 
			
		||||
    } else {
 | 
			
		||||
        nbd_co_receive_reply(client, &request, &reply, NULL, 0);
 | 
			
		||||
    }
 | 
			
		||||
    nbd_coroutine_end(client, &request);
 | 
			
		||||
    return -reply.error;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* qemu-nbd has a limit of slightly less than 1M per request.  Try to
 | 
			
		||||
 * remain aligned to 4K. */
 | 
			
		||||
#define NBD_MAX_SECTORS 2040
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_co_readv(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
    int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    int offset = 0;
 | 
			
		||||
    int ret;
 | 
			
		||||
    while (nb_sectors > NBD_MAX_SECTORS) {
 | 
			
		||||
        ret = nbd_co_readv_1(client, sector_num,
 | 
			
		||||
                             NBD_MAX_SECTORS, qiov, offset);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
        offset += NBD_MAX_SECTORS * 512;
 | 
			
		||||
        sector_num += NBD_MAX_SECTORS;
 | 
			
		||||
        nb_sectors -= NBD_MAX_SECTORS;
 | 
			
		||||
    }
 | 
			
		||||
    return nbd_co_readv_1(client, sector_num, nb_sectors, qiov, offset);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_co_writev(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
                                 int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    int offset = 0;
 | 
			
		||||
    int ret;
 | 
			
		||||
    while (nb_sectors > NBD_MAX_SECTORS) {
 | 
			
		||||
        ret = nbd_co_writev_1(client, sector_num,
 | 
			
		||||
                              NBD_MAX_SECTORS, qiov, offset);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            return ret;
 | 
			
		||||
        }
 | 
			
		||||
        offset += NBD_MAX_SECTORS * 512;
 | 
			
		||||
        sector_num += NBD_MAX_SECTORS;
 | 
			
		||||
        nb_sectors -= NBD_MAX_SECTORS;
 | 
			
		||||
    }
 | 
			
		||||
    return nbd_co_writev_1(client, sector_num, nb_sectors, qiov, offset);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_co_flush(NbdClientSession *client)
 | 
			
		||||
{
 | 
			
		||||
    struct nbd_request request = { .type = NBD_CMD_FLUSH };
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
    ssize_t ret;
 | 
			
		||||
 | 
			
		||||
    if (!(client->nbdflags & NBD_FLAG_SEND_FLUSH)) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (client->nbdflags & NBD_FLAG_SEND_FUA) {
 | 
			
		||||
        request.type |= NBD_CMD_FLAG_FUA;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    request.from = 0;
 | 
			
		||||
    request.len = 0;
 | 
			
		||||
 | 
			
		||||
    nbd_coroutine_start(client, &request);
 | 
			
		||||
    ret = nbd_co_send_request(client, &request, NULL, 0);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        reply.error = -ret;
 | 
			
		||||
    } else {
 | 
			
		||||
        nbd_co_receive_reply(client, &request, &reply, NULL, 0);
 | 
			
		||||
    }
 | 
			
		||||
    nbd_coroutine_end(client, &request);
 | 
			
		||||
    return -reply.error;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_co_discard(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
    int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    struct nbd_request request = { .type = NBD_CMD_TRIM };
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
    ssize_t ret;
 | 
			
		||||
 | 
			
		||||
    if (!(client->nbdflags & NBD_FLAG_SEND_TRIM)) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    request.from = sector_num * 512;
 | 
			
		||||
    request.len = nb_sectors * 512;
 | 
			
		||||
 | 
			
		||||
    nbd_coroutine_start(client, &request);
 | 
			
		||||
    ret = nbd_co_send_request(client, &request, NULL, 0);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        reply.error = -ret;
 | 
			
		||||
    } else {
 | 
			
		||||
        nbd_co_receive_reply(client, &request, &reply, NULL, 0);
 | 
			
		||||
    }
 | 
			
		||||
    nbd_coroutine_end(client, &request);
 | 
			
		||||
    return -reply.error;
 | 
			
		||||
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void nbd_client_session_detach_aio_context(NbdClientSession *client)
 | 
			
		||||
{
 | 
			
		||||
    aio_set_fd_handler(bdrv_get_aio_context(client->bs), client->sock,
 | 
			
		||||
                       NULL, NULL, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void nbd_client_session_attach_aio_context(NbdClientSession *client,
 | 
			
		||||
                                           AioContext *new_context)
 | 
			
		||||
{
 | 
			
		||||
    aio_set_fd_handler(new_context, client->sock,
 | 
			
		||||
                       nbd_reply_ready, NULL, client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void nbd_client_session_close(NbdClientSession *client)
 | 
			
		||||
{
 | 
			
		||||
    struct nbd_request request = {
 | 
			
		||||
        .type = NBD_CMD_DISC,
 | 
			
		||||
        .from = 0,
 | 
			
		||||
        .len = 0
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    if (!client->bs) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
    if (client->sock == -1) {
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    nbd_send_request(client->sock, &request);
 | 
			
		||||
 | 
			
		||||
    nbd_teardown_connection(client);
 | 
			
		||||
    client->bs = NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_init(NbdClientSession *client, BlockDriverState *bs,
 | 
			
		||||
    int sock, const char *export)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    /* NBD handshake */
 | 
			
		||||
    logout("session init %s\n", export);
 | 
			
		||||
    qemu_set_block(sock);
 | 
			
		||||
    ret = nbd_receive_negotiate(sock, export,
 | 
			
		||||
                                &client->nbdflags, &client->size,
 | 
			
		||||
                                &client->blocksize);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        logout("Failed to negotiate with the NBD server\n");
 | 
			
		||||
        closesocket(sock);
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_init(&client->send_mutex);
 | 
			
		||||
    qemu_co_mutex_init(&client->free_sema);
 | 
			
		||||
    client->bs = bs;
 | 
			
		||||
    client->sock = sock;
 | 
			
		||||
 | 
			
		||||
    /* Now that we're connected, set the socket to be non-blocking and
 | 
			
		||||
     * kick the reply mechanism.  */
 | 
			
		||||
    qemu_set_nonblock(sock);
 | 
			
		||||
    nbd_client_session_attach_aio_context(client, bdrv_get_aio_context(bs));
 | 
			
		||||
 | 
			
		||||
    logout("Established connection with NBD server\n");
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
@@ -1,54 +0,0 @@
 | 
			
		||||
#ifndef NBD_CLIENT_H
 | 
			
		||||
#define NBD_CLIENT_H
 | 
			
		||||
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/nbd.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
 | 
			
		||||
/* #define DEBUG_NBD */
 | 
			
		||||
 | 
			
		||||
#if defined(DEBUG_NBD)
 | 
			
		||||
#define logout(fmt, ...) \
 | 
			
		||||
    fprintf(stderr, "nbd\t%-24s" fmt, __func__, ##__VA_ARGS__)
 | 
			
		||||
#else
 | 
			
		||||
#define logout(fmt, ...) ((void)0)
 | 
			
		||||
#endif
 | 
			
		||||
 | 
			
		||||
#define MAX_NBD_REQUESTS    16
 | 
			
		||||
 | 
			
		||||
typedef struct NbdClientSession {
 | 
			
		||||
    int sock;
 | 
			
		||||
    uint32_t nbdflags;
 | 
			
		||||
    off_t size;
 | 
			
		||||
    size_t blocksize;
 | 
			
		||||
 | 
			
		||||
    CoMutex send_mutex;
 | 
			
		||||
    CoMutex free_sema;
 | 
			
		||||
    Coroutine *send_coroutine;
 | 
			
		||||
    int in_flight;
 | 
			
		||||
 | 
			
		||||
    Coroutine *recv_coroutine[MAX_NBD_REQUESTS];
 | 
			
		||||
    struct nbd_reply reply;
 | 
			
		||||
 | 
			
		||||
    bool is_unix;
 | 
			
		||||
 | 
			
		||||
    BlockDriverState *bs;
 | 
			
		||||
} NbdClientSession;
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_init(NbdClientSession *client, BlockDriverState *bs,
 | 
			
		||||
                            int sock, const char *export_name);
 | 
			
		||||
void nbd_client_session_close(NbdClientSession *client);
 | 
			
		||||
 | 
			
		||||
int nbd_client_session_co_discard(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
                                  int nb_sectors);
 | 
			
		||||
int nbd_client_session_co_flush(NbdClientSession *client);
 | 
			
		||||
int nbd_client_session_co_writev(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
                                 int nb_sectors, QEMUIOVector *qiov);
 | 
			
		||||
int nbd_client_session_co_readv(NbdClientSession *client, int64_t sector_num,
 | 
			
		||||
                                int nb_sectors, QEMUIOVector *qiov);
 | 
			
		||||
 | 
			
		||||
void nbd_client_session_detach_aio_context(NbdClientSession *client);
 | 
			
		||||
void nbd_client_session_attach_aio_context(NbdClientSession *client,
 | 
			
		||||
                                           AioContext *new_context);
 | 
			
		||||
 | 
			
		||||
#endif /* NBD_CLIENT_H */
 | 
			
		||||
							
								
								
									
										396
									
								
								block/nbd.c
									
									
									
									
									
								
							
							
						
						
									
										396
									
								
								block/nbd.c
									
									
									
									
									
								
							@@ -1,396 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for  NBD
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (C) 2008 Bull S.A.S.
 | 
			
		||||
 *     Author: Laurent Vivier <Laurent.Vivier@bull.net>
 | 
			
		||||
 *
 | 
			
		||||
 * Some parts:
 | 
			
		||||
 *    Copyright (C) 2007 Anthony Liguori <anthony@codemonkey.ws>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "block/nbd-client.h"
 | 
			
		||||
#include "qemu/uri.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
#include "qemu/sockets.h"
 | 
			
		||||
#include "qapi/qmp/qjson.h"
 | 
			
		||||
#include "qapi/qmp/qint.h"
 | 
			
		||||
 | 
			
		||||
#include <sys/types.h>
 | 
			
		||||
#include <unistd.h>
 | 
			
		||||
 | 
			
		||||
#define EN_OPTSTR ":exportname="
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVNBDState {
 | 
			
		||||
    NbdClientSession client;
 | 
			
		||||
    QemuOpts *socket_opts;
 | 
			
		||||
} BDRVNBDState;
 | 
			
		||||
 | 
			
		||||
static int nbd_parse_uri(const char *filename, QDict *options)
 | 
			
		||||
{
 | 
			
		||||
    URI *uri;
 | 
			
		||||
    const char *p;
 | 
			
		||||
    QueryParams *qp = NULL;
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    bool is_unix;
 | 
			
		||||
 | 
			
		||||
    uri = uri_parse(filename);
 | 
			
		||||
    if (!uri) {
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* transport */
 | 
			
		||||
    if (!strcmp(uri->scheme, "nbd")) {
 | 
			
		||||
        is_unix = false;
 | 
			
		||||
    } else if (!strcmp(uri->scheme, "nbd+tcp")) {
 | 
			
		||||
        is_unix = false;
 | 
			
		||||
    } else if (!strcmp(uri->scheme, "nbd+unix")) {
 | 
			
		||||
        is_unix = true;
 | 
			
		||||
    } else {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    p = uri->path ? uri->path : "/";
 | 
			
		||||
    p += strspn(p, "/");
 | 
			
		||||
    if (p[0]) {
 | 
			
		||||
        qdict_put(options, "export", qstring_from_str(p));
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qp = query_params_parse(uri->query);
 | 
			
		||||
    if (qp->n > 1 || (is_unix && !qp->n) || (!is_unix && qp->n)) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (is_unix) {
 | 
			
		||||
        /* nbd+unix:///export?socket=path */
 | 
			
		||||
        if (uri->server || uri->port || strcmp(qp->p[0].name, "socket")) {
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
        qdict_put(options, "path", qstring_from_str(qp->p[0].value));
 | 
			
		||||
    } else {
 | 
			
		||||
        QString *host;
 | 
			
		||||
        /* nbd[+tcp]://host[:port]/export */
 | 
			
		||||
        if (!uri->server) {
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        /* strip braces from literal IPv6 address */
 | 
			
		||||
        if (uri->server[0] == '[') {
 | 
			
		||||
            host = qstring_from_substr(uri->server, 1,
 | 
			
		||||
                                       strlen(uri->server) - 2);
 | 
			
		||||
        } else {
 | 
			
		||||
            host = qstring_from_str(uri->server);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        qdict_put(options, "host", host);
 | 
			
		||||
        if (uri->port) {
 | 
			
		||||
            char* port_str = g_strdup_printf("%d", uri->port);
 | 
			
		||||
            qdict_put(options, "port", qstring_from_str(port_str));
 | 
			
		||||
            g_free(port_str);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    if (qp) {
 | 
			
		||||
        query_params_free(qp);
 | 
			
		||||
    }
 | 
			
		||||
    uri_free(uri);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_parse_filename(const char *filename, QDict *options,
 | 
			
		||||
                               Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    char *file;
 | 
			
		||||
    char *export_name;
 | 
			
		||||
    const char *host_spec;
 | 
			
		||||
    const char *unixpath;
 | 
			
		||||
 | 
			
		||||
    if (qdict_haskey(options, "host")
 | 
			
		||||
        || qdict_haskey(options, "port")
 | 
			
		||||
        || qdict_haskey(options, "path"))
 | 
			
		||||
    {
 | 
			
		||||
        error_setg(errp, "host/port/path and a file name may not be specified "
 | 
			
		||||
                         "at the same time");
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (strstr(filename, "://")) {
 | 
			
		||||
        int ret = nbd_parse_uri(filename, options);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            error_setg(errp, "No valid URL specified");
 | 
			
		||||
        }
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    file = g_strdup(filename);
 | 
			
		||||
 | 
			
		||||
    export_name = strstr(file, EN_OPTSTR);
 | 
			
		||||
    if (export_name) {
 | 
			
		||||
        if (export_name[strlen(EN_OPTSTR)] == 0) {
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
        export_name[0] = 0; /* truncate 'file' */
 | 
			
		||||
        export_name += strlen(EN_OPTSTR);
 | 
			
		||||
 | 
			
		||||
        qdict_put(options, "export", qstring_from_str(export_name));
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* extract the host_spec - fail if it's not nbd:... */
 | 
			
		||||
    if (!strstart(file, "nbd:", &host_spec)) {
 | 
			
		||||
        error_setg(errp, "File name string for NBD must start with 'nbd:'");
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!*host_spec) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* are we a UNIX or TCP socket? */
 | 
			
		||||
    if (strstart(host_spec, "unix:", &unixpath)) {
 | 
			
		||||
        qdict_put(options, "path", qstring_from_str(unixpath));
 | 
			
		||||
    } else {
 | 
			
		||||
        InetSocketAddress *addr = NULL;
 | 
			
		||||
 | 
			
		||||
        addr = inet_parse(host_spec, errp);
 | 
			
		||||
        if (!addr) {
 | 
			
		||||
            goto out;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        qdict_put(options, "host", qstring_from_str(addr->host));
 | 
			
		||||
        qdict_put(options, "port", qstring_from_str(addr->port));
 | 
			
		||||
        qapi_free_InetSocketAddress(addr);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
out:
 | 
			
		||||
    g_free(file);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_config(BDRVNBDState *s, QDict *options, char **export,
 | 
			
		||||
                       Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    if (qdict_haskey(options, "path") == qdict_haskey(options, "host")) {
 | 
			
		||||
        if (qdict_haskey(options, "path")) {
 | 
			
		||||
            error_setg(errp, "path and host may not be used at the same time.");
 | 
			
		||||
        } else {
 | 
			
		||||
            error_setg(errp, "one of path and host must be specified.");
 | 
			
		||||
        }
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->client.is_unix = qdict_haskey(options, "path");
 | 
			
		||||
    s->socket_opts = qemu_opts_create(&socket_optslist, NULL, 0,
 | 
			
		||||
                                      &error_abort);
 | 
			
		||||
 | 
			
		||||
    qemu_opts_absorb_qdict(s->socket_opts, options, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!qemu_opt_get(s->socket_opts, "port")) {
 | 
			
		||||
        qemu_opt_set_number(s->socket_opts, "port", NBD_DEFAULT_PORT);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *export = g_strdup(qdict_get_try_str(options, "export"));
 | 
			
		||||
    if (*export) {
 | 
			
		||||
        qdict_del(options, "export");
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_establish_connection(BlockDriverState *bs, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
    int sock;
 | 
			
		||||
 | 
			
		||||
    if (s->client.is_unix) {
 | 
			
		||||
        sock = unix_connect_opts(s->socket_opts, errp, NULL, NULL);
 | 
			
		||||
    } else {
 | 
			
		||||
        sock = inet_connect_opts(s->socket_opts, errp, NULL, NULL);
 | 
			
		||||
        if (sock >= 0) {
 | 
			
		||||
            socket_set_nodelay(sock);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Failed to establish connection */
 | 
			
		||||
    if (sock < 0) {
 | 
			
		||||
        logout("Failed to establish connection to NBD server\n");
 | 
			
		||||
        return -errno;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return sock;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                    Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
    char *export = NULL;
 | 
			
		||||
    int result, sock;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    /* Pop the config into our state object. Exit if invalid. */
 | 
			
		||||
    nbd_config(s, options, &export, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* establish TCP connection, return error if it fails
 | 
			
		||||
     * TODO: Configurable retry-until-timeout behaviour.
 | 
			
		||||
     */
 | 
			
		||||
    sock = nbd_establish_connection(bs, errp);
 | 
			
		||||
    if (sock < 0) {
 | 
			
		||||
        return sock;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* NBD handshake */
 | 
			
		||||
    result = nbd_client_session_init(&s->client, bs, sock, export);
 | 
			
		||||
    g_free(export);
 | 
			
		||||
    return result;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_readv(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                        int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return nbd_client_session_co_readv(&s->client, sector_num,
 | 
			
		||||
                                       nb_sectors, qiov);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_writev(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                         int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return nbd_client_session_co_writev(&s->client, sector_num,
 | 
			
		||||
                                        nb_sectors, qiov);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_flush(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return nbd_client_session_co_flush(&s->client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nbd_co_discard(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                          int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return nbd_client_session_co_discard(&s->client, sector_num,
 | 
			
		||||
                                         nb_sectors);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    qemu_opts_del(s->socket_opts);
 | 
			
		||||
    nbd_client_session_close(&s->client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t nbd_getlength(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    return s->client.size;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_detach_aio_context(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    nbd_client_session_detach_aio_context(&s->client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nbd_attach_aio_context(BlockDriverState *bs,
 | 
			
		||||
                                   AioContext *new_context)
 | 
			
		||||
{
 | 
			
		||||
    BDRVNBDState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    nbd_client_session_attach_aio_context(&s->client, new_context);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_nbd = {
 | 
			
		||||
    .format_name                = "nbd",
 | 
			
		||||
    .protocol_name              = "nbd",
 | 
			
		||||
    .instance_size              = sizeof(BDRVNBDState),
 | 
			
		||||
    .bdrv_parse_filename        = nbd_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = nbd_open,
 | 
			
		||||
    .bdrv_co_readv              = nbd_co_readv,
 | 
			
		||||
    .bdrv_co_writev             = nbd_co_writev,
 | 
			
		||||
    .bdrv_close                 = nbd_close,
 | 
			
		||||
    .bdrv_co_flush_to_os        = nbd_co_flush,
 | 
			
		||||
    .bdrv_co_discard            = nbd_co_discard,
 | 
			
		||||
    .bdrv_getlength             = nbd_getlength,
 | 
			
		||||
    .bdrv_detach_aio_context    = nbd_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = nbd_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_nbd_tcp = {
 | 
			
		||||
    .format_name                = "nbd",
 | 
			
		||||
    .protocol_name              = "nbd+tcp",
 | 
			
		||||
    .instance_size              = sizeof(BDRVNBDState),
 | 
			
		||||
    .bdrv_parse_filename        = nbd_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = nbd_open,
 | 
			
		||||
    .bdrv_co_readv              = nbd_co_readv,
 | 
			
		||||
    .bdrv_co_writev             = nbd_co_writev,
 | 
			
		||||
    .bdrv_close                 = nbd_close,
 | 
			
		||||
    .bdrv_co_flush_to_os        = nbd_co_flush,
 | 
			
		||||
    .bdrv_co_discard            = nbd_co_discard,
 | 
			
		||||
    .bdrv_getlength             = nbd_getlength,
 | 
			
		||||
    .bdrv_detach_aio_context    = nbd_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = nbd_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_nbd_unix = {
 | 
			
		||||
    .format_name                = "nbd",
 | 
			
		||||
    .protocol_name              = "nbd+unix",
 | 
			
		||||
    .instance_size              = sizeof(BDRVNBDState),
 | 
			
		||||
    .bdrv_parse_filename        = nbd_parse_filename,
 | 
			
		||||
    .bdrv_file_open             = nbd_open,
 | 
			
		||||
    .bdrv_co_readv              = nbd_co_readv,
 | 
			
		||||
    .bdrv_co_writev             = nbd_co_writev,
 | 
			
		||||
    .bdrv_close                 = nbd_close,
 | 
			
		||||
    .bdrv_co_flush_to_os        = nbd_co_flush,
 | 
			
		||||
    .bdrv_co_discard            = nbd_co_discard,
 | 
			
		||||
    .bdrv_getlength             = nbd_getlength,
 | 
			
		||||
    .bdrv_detach_aio_context    = nbd_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context    = nbd_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_nbd_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_nbd);
 | 
			
		||||
    bdrv_register(&bdrv_nbd_tcp);
 | 
			
		||||
    bdrv_register(&bdrv_nbd_unix);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_nbd_init);
 | 
			
		||||
							
								
								
									
										485
									
								
								block/nfs.c
									
									
									
									
									
								
							
							
						
						
									
										485
									
								
								block/nfs.c
									
									
									
									
									
								
							@@ -1,485 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * QEMU Block driver for native access to files on NFS shares
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2014 Peter Lieven <pl@kamp.de>
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "config-host.h"
 | 
			
		||||
 | 
			
		||||
#include <poll.h>
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "qemu/config-file.h"
 | 
			
		||||
#include "qemu/error-report.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "trace.h"
 | 
			
		||||
#include "qemu/iov.h"
 | 
			
		||||
#include "qemu/uri.h"
 | 
			
		||||
#include "sysemu/sysemu.h"
 | 
			
		||||
#include <nfsc/libnfs.h>
 | 
			
		||||
 | 
			
		||||
typedef struct NFSClient {
 | 
			
		||||
    struct nfs_context *context;
 | 
			
		||||
    struct nfsfh *fh;
 | 
			
		||||
    int events;
 | 
			
		||||
    bool has_zero_init;
 | 
			
		||||
    AioContext *aio_context;
 | 
			
		||||
} NFSClient;
 | 
			
		||||
 | 
			
		||||
typedef struct NFSRPC {
 | 
			
		||||
    int ret;
 | 
			
		||||
    int complete;
 | 
			
		||||
    QEMUIOVector *iov;
 | 
			
		||||
    struct stat *st;
 | 
			
		||||
    Coroutine *co;
 | 
			
		||||
    QEMUBH *bh;
 | 
			
		||||
    NFSClient *client;
 | 
			
		||||
} NFSRPC;
 | 
			
		||||
 | 
			
		||||
static void nfs_process_read(void *arg);
 | 
			
		||||
static void nfs_process_write(void *arg);
 | 
			
		||||
 | 
			
		||||
static void nfs_set_events(NFSClient *client)
 | 
			
		||||
{
 | 
			
		||||
    int ev = nfs_which_events(client->context);
 | 
			
		||||
    if (ev != client->events) {
 | 
			
		||||
        aio_set_fd_handler(client->aio_context,
 | 
			
		||||
                           nfs_get_fd(client->context),
 | 
			
		||||
                           (ev & POLLIN) ? nfs_process_read : NULL,
 | 
			
		||||
                           (ev & POLLOUT) ? nfs_process_write : NULL,
 | 
			
		||||
                           client);
 | 
			
		||||
 | 
			
		||||
    }
 | 
			
		||||
    client->events = ev;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_process_read(void *arg)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = arg;
 | 
			
		||||
    nfs_service(client->context, POLLIN);
 | 
			
		||||
    nfs_set_events(client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_process_write(void *arg)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = arg;
 | 
			
		||||
    nfs_service(client->context, POLLOUT);
 | 
			
		||||
    nfs_set_events(client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_co_init_task(NFSClient *client, NFSRPC *task)
 | 
			
		||||
{
 | 
			
		||||
    *task = (NFSRPC) {
 | 
			
		||||
        .co             = qemu_coroutine_self(),
 | 
			
		||||
        .client         = client,
 | 
			
		||||
    };
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_co_generic_bh_cb(void *opaque)
 | 
			
		||||
{
 | 
			
		||||
    NFSRPC *task = opaque;
 | 
			
		||||
    task->complete = 1;
 | 
			
		||||
    qemu_bh_delete(task->bh);
 | 
			
		||||
    qemu_coroutine_enter(task->co, NULL);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void
 | 
			
		||||
nfs_co_generic_cb(int ret, struct nfs_context *nfs, void *data,
 | 
			
		||||
                  void *private_data)
 | 
			
		||||
{
 | 
			
		||||
    NFSRPC *task = private_data;
 | 
			
		||||
    task->ret = ret;
 | 
			
		||||
    if (task->ret > 0 && task->iov) {
 | 
			
		||||
        if (task->ret <= task->iov->size) {
 | 
			
		||||
            qemu_iovec_from_buf(task->iov, 0, data, task->ret);
 | 
			
		||||
        } else {
 | 
			
		||||
            task->ret = -EIO;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    if (task->ret == 0 && task->st) {
 | 
			
		||||
        memcpy(task->st, data, sizeof(struct stat));
 | 
			
		||||
    }
 | 
			
		||||
    if (task->ret < 0) {
 | 
			
		||||
        error_report("NFS Error: %s", nfs_get_error(nfs));
 | 
			
		||||
    }
 | 
			
		||||
    if (task->co) {
 | 
			
		||||
        task->bh = aio_bh_new(task->client->aio_context,
 | 
			
		||||
                              nfs_co_generic_bh_cb, task);
 | 
			
		||||
        qemu_bh_schedule(task->bh);
 | 
			
		||||
    } else {
 | 
			
		||||
        task->complete = 1;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn nfs_co_readv(BlockDriverState *bs,
 | 
			
		||||
                                     int64_t sector_num, int nb_sectors,
 | 
			
		||||
                                     QEMUIOVector *iov)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    NFSRPC task;
 | 
			
		||||
 | 
			
		||||
    nfs_co_init_task(client, &task);
 | 
			
		||||
    task.iov = iov;
 | 
			
		||||
 | 
			
		||||
    if (nfs_pread_async(client->context, client->fh,
 | 
			
		||||
                        sector_num * BDRV_SECTOR_SIZE,
 | 
			
		||||
                        nb_sectors * BDRV_SECTOR_SIZE,
 | 
			
		||||
                        nfs_co_generic_cb, &task) != 0) {
 | 
			
		||||
        return -ENOMEM;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (!task.complete) {
 | 
			
		||||
        nfs_set_events(client);
 | 
			
		||||
        qemu_coroutine_yield();
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (task.ret < 0) {
 | 
			
		||||
        return task.ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* zero pad short reads */
 | 
			
		||||
    if (task.ret < iov->size) {
 | 
			
		||||
        qemu_iovec_memset(iov, task.ret, 0, iov->size - task.ret);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn nfs_co_writev(BlockDriverState *bs,
 | 
			
		||||
                                        int64_t sector_num, int nb_sectors,
 | 
			
		||||
                                        QEMUIOVector *iov)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    NFSRPC task;
 | 
			
		||||
    char *buf = NULL;
 | 
			
		||||
 | 
			
		||||
    nfs_co_init_task(client, &task);
 | 
			
		||||
 | 
			
		||||
    buf = g_malloc(nb_sectors * BDRV_SECTOR_SIZE);
 | 
			
		||||
    qemu_iovec_to_buf(iov, 0, buf, nb_sectors * BDRV_SECTOR_SIZE);
 | 
			
		||||
 | 
			
		||||
    if (nfs_pwrite_async(client->context, client->fh,
 | 
			
		||||
                         sector_num * BDRV_SECTOR_SIZE,
 | 
			
		||||
                         nb_sectors * BDRV_SECTOR_SIZE,
 | 
			
		||||
                         buf, nfs_co_generic_cb, &task) != 0) {
 | 
			
		||||
        g_free(buf);
 | 
			
		||||
        return -ENOMEM;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (!task.complete) {
 | 
			
		||||
        nfs_set_events(client);
 | 
			
		||||
        qemu_coroutine_yield();
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(buf);
 | 
			
		||||
 | 
			
		||||
    if (task.ret != nb_sectors * BDRV_SECTOR_SIZE) {
 | 
			
		||||
        return task.ret < 0 ? task.ret : -EIO;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int coroutine_fn nfs_co_flush(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    NFSRPC task;
 | 
			
		||||
 | 
			
		||||
    nfs_co_init_task(client, &task);
 | 
			
		||||
 | 
			
		||||
    if (nfs_fsync_async(client->context, client->fh, nfs_co_generic_cb,
 | 
			
		||||
                        &task) != 0) {
 | 
			
		||||
        return -ENOMEM;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (!task.complete) {
 | 
			
		||||
        nfs_set_events(client);
 | 
			
		||||
        qemu_coroutine_yield();
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return task.ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* TODO Convert to fine grained options */
 | 
			
		||||
static QemuOptsList runtime_opts = {
 | 
			
		||||
    .name = "nfs",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = "filename",
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "URL to the NFS file",
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    },
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void nfs_detach_aio_context(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    aio_set_fd_handler(client->aio_context,
 | 
			
		||||
                       nfs_get_fd(client->context),
 | 
			
		||||
                       NULL, NULL, NULL);
 | 
			
		||||
    client->events = 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_attach_aio_context(BlockDriverState *bs,
 | 
			
		||||
                                   AioContext *new_context)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    client->aio_context = new_context;
 | 
			
		||||
    nfs_set_events(client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_client_close(NFSClient *client)
 | 
			
		||||
{
 | 
			
		||||
    if (client->context) {
 | 
			
		||||
        if (client->fh) {
 | 
			
		||||
            nfs_close(client->context, client->fh);
 | 
			
		||||
        }
 | 
			
		||||
        aio_set_fd_handler(client->aio_context,
 | 
			
		||||
                           nfs_get_fd(client->context),
 | 
			
		||||
                           NULL, NULL, NULL);
 | 
			
		||||
        nfs_destroy_context(client->context);
 | 
			
		||||
    }
 | 
			
		||||
    memset(client, 0, sizeof(NFSClient));
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void nfs_file_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    nfs_client_close(client);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t nfs_client_open(NFSClient *client, const char *filename,
 | 
			
		||||
                               int flags, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int ret = -EINVAL, i;
 | 
			
		||||
    struct stat st;
 | 
			
		||||
    URI *uri;
 | 
			
		||||
    QueryParams *qp = NULL;
 | 
			
		||||
    char *file = NULL, *strp = NULL;
 | 
			
		||||
 | 
			
		||||
    uri = uri_parse(filename);
 | 
			
		||||
    if (!uri) {
 | 
			
		||||
        error_setg(errp, "Invalid URL specified");
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    if (!uri->server) {
 | 
			
		||||
        error_setg(errp, "Invalid URL specified");
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    strp = strrchr(uri->path, '/');
 | 
			
		||||
    if (strp == NULL) {
 | 
			
		||||
        error_setg(errp, "Invalid URL specified");
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    file = g_strdup(strp);
 | 
			
		||||
    *strp = 0;
 | 
			
		||||
 | 
			
		||||
    client->context = nfs_init_context();
 | 
			
		||||
    if (client->context == NULL) {
 | 
			
		||||
        error_setg(errp, "Failed to init NFS context");
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qp = query_params_parse(uri->query);
 | 
			
		||||
    for (i = 0; i < qp->n; i++) {
 | 
			
		||||
        unsigned long long val;
 | 
			
		||||
        if (!qp->p[i].value) {
 | 
			
		||||
            error_setg(errp, "Value for NFS parameter expected: %s",
 | 
			
		||||
                       qp->p[i].name);
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        if (parse_uint_full(qp->p[i].value, &val, 0)) {
 | 
			
		||||
            error_setg(errp, "Illegal value for NFS parameter: %s",
 | 
			
		||||
                       qp->p[i].name);
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        if (!strcmp(qp->p[i].name, "uid")) {
 | 
			
		||||
            nfs_set_uid(client->context, val);
 | 
			
		||||
        } else if (!strcmp(qp->p[i].name, "gid")) {
 | 
			
		||||
            nfs_set_gid(client->context, val);
 | 
			
		||||
        } else if (!strcmp(qp->p[i].name, "tcp-syncnt")) {
 | 
			
		||||
            nfs_set_tcp_syncnt(client->context, val);
 | 
			
		||||
#ifdef LIBNFS_FEATURE_READAHEAD
 | 
			
		||||
        } else if (!strcmp(qp->p[i].name, "readahead")) {
 | 
			
		||||
            nfs_set_readahead(client->context, val);
 | 
			
		||||
#endif
 | 
			
		||||
        } else {
 | 
			
		||||
            error_setg(errp, "Unknown NFS parameter name: %s",
 | 
			
		||||
                       qp->p[i].name);
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = nfs_mount(client->context, uri->server, uri->path);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_setg(errp, "Failed to mount nfs share: %s",
 | 
			
		||||
                   nfs_get_error(client->context));
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (flags & O_CREAT) {
 | 
			
		||||
        ret = nfs_creat(client->context, file, 0600, &client->fh);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            error_setg(errp, "Failed to create file: %s",
 | 
			
		||||
                       nfs_get_error(client->context));
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        ret = nfs_open(client->context, file, flags, &client->fh);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            error_setg(errp, "Failed to open file : %s",
 | 
			
		||||
                       nfs_get_error(client->context));
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = nfs_fstat(client->context, client->fh, &st);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_setg(errp, "Failed to fstat file: %s",
 | 
			
		||||
                   nfs_get_error(client->context));
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = DIV_ROUND_UP(st.st_size, BDRV_SECTOR_SIZE);
 | 
			
		||||
    client->has_zero_init = S_ISREG(st.st_mode);
 | 
			
		||||
    goto out;
 | 
			
		||||
fail:
 | 
			
		||||
    nfs_client_close(client);
 | 
			
		||||
out:
 | 
			
		||||
    if (qp) {
 | 
			
		||||
        query_params_free(qp);
 | 
			
		||||
    }
 | 
			
		||||
    uri_free(uri);
 | 
			
		||||
    g_free(file);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nfs_file_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                         Error **errp) {
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    int64_t ret;
 | 
			
		||||
    QemuOpts *opts;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
    client->aio_context = bdrv_get_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
 | 
			
		||||
    qemu_opts_absorb_qdict(opts, options, &local_err);
 | 
			
		||||
    if (local_err) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        return -EINVAL;
 | 
			
		||||
    }
 | 
			
		||||
    ret = nfs_client_open(client, qemu_opt_get(opts, "filename"),
 | 
			
		||||
                          (flags & BDRV_O_RDWR) ? O_RDWR : O_RDONLY,
 | 
			
		||||
                          errp);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
    bs->total_sectors = ret;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nfs_file_create(const char *url, QemuOpts *opts, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int ret = 0;
 | 
			
		||||
    int64_t total_size = 0;
 | 
			
		||||
    NFSClient *client = g_malloc0(sizeof(NFSClient));
 | 
			
		||||
 | 
			
		||||
    client->aio_context = qemu_get_aio_context();
 | 
			
		||||
 | 
			
		||||
    /* Read out options */
 | 
			
		||||
    total_size = qemu_opt_get_size_del(opts, BLOCK_OPT_SIZE, 0);
 | 
			
		||||
 | 
			
		||||
    ret = nfs_client_open(client, url, O_CREAT, errp);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto out;
 | 
			
		||||
    }
 | 
			
		||||
    ret = nfs_ftruncate(client->context, client->fh, total_size);
 | 
			
		||||
    nfs_client_close(client);
 | 
			
		||||
out:
 | 
			
		||||
    g_free(client);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nfs_has_zero_init(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    return client->has_zero_init;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t nfs_get_allocated_file_size(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    NFSRPC task = {0};
 | 
			
		||||
    struct stat st;
 | 
			
		||||
 | 
			
		||||
    task.st = &st;
 | 
			
		||||
    if (nfs_fstat_async(client->context, client->fh, nfs_co_generic_cb,
 | 
			
		||||
                        &task) != 0) {
 | 
			
		||||
        return -ENOMEM;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    while (!task.complete) {
 | 
			
		||||
        nfs_set_events(client);
 | 
			
		||||
        aio_poll(client->aio_context, true);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return (task.ret < 0 ? task.ret : st.st_blocks * st.st_blksize);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int nfs_file_truncate(BlockDriverState *bs, int64_t offset)
 | 
			
		||||
{
 | 
			
		||||
    NFSClient *client = bs->opaque;
 | 
			
		||||
    return nfs_ftruncate(client->context, client->fh, offset);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_nfs = {
 | 
			
		||||
    .format_name                    = "nfs",
 | 
			
		||||
    .protocol_name                  = "nfs",
 | 
			
		||||
 | 
			
		||||
    .instance_size                  = sizeof(NFSClient),
 | 
			
		||||
    .bdrv_needs_filename            = true,
 | 
			
		||||
    .bdrv_has_zero_init             = nfs_has_zero_init,
 | 
			
		||||
    .bdrv_get_allocated_file_size   = nfs_get_allocated_file_size,
 | 
			
		||||
    .bdrv_truncate                  = nfs_file_truncate,
 | 
			
		||||
 | 
			
		||||
    .bdrv_file_open                 = nfs_file_open,
 | 
			
		||||
    .bdrv_close                     = nfs_file_close,
 | 
			
		||||
    .bdrv_create                    = nfs_file_create,
 | 
			
		||||
 | 
			
		||||
    .bdrv_co_readv                  = nfs_co_readv,
 | 
			
		||||
    .bdrv_co_writev                 = nfs_co_writev,
 | 
			
		||||
    .bdrv_co_flush_to_disk          = nfs_co_flush,
 | 
			
		||||
 | 
			
		||||
    .bdrv_detach_aio_context        = nfs_detach_aio_context,
 | 
			
		||||
    .bdrv_attach_aio_context        = nfs_attach_aio_context,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void nfs_block_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_nfs);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(nfs_block_init);
 | 
			
		||||
@@ -1,189 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for Parallels disk image format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2007 Alex Beregszaszi
 | 
			
		||||
 *
 | 
			
		||||
 * This code is based on comparing different disk images created by Parallels.
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
 | 
			
		||||
#define HEADER_MAGIC "WithoutFreeSpace"
 | 
			
		||||
#define HEADER_VERSION 2
 | 
			
		||||
#define HEADER_SIZE 64
 | 
			
		||||
 | 
			
		||||
// always little-endian
 | 
			
		||||
struct parallels_header {
 | 
			
		||||
    char magic[16]; // "WithoutFreeSpace"
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint32_t heads;
 | 
			
		||||
    uint32_t cylinders;
 | 
			
		||||
    uint32_t tracks;
 | 
			
		||||
    uint32_t catalog_entries;
 | 
			
		||||
    uint32_t nb_sectors;
 | 
			
		||||
    char padding[24];
 | 
			
		||||
} QEMU_PACKED;
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVParallelsState {
 | 
			
		||||
    CoMutex lock;
 | 
			
		||||
 | 
			
		||||
    uint32_t *catalog_bitmap;
 | 
			
		||||
    unsigned int catalog_size;
 | 
			
		||||
 | 
			
		||||
    unsigned int tracks;
 | 
			
		||||
} BDRVParallelsState;
 | 
			
		||||
 | 
			
		||||
static int parallels_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const struct parallels_header *ph = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size < HEADER_SIZE)
 | 
			
		||||
	return 0;
 | 
			
		||||
 | 
			
		||||
    if (!memcmp(ph->magic, HEADER_MAGIC, 16) &&
 | 
			
		||||
	(le32_to_cpu(ph->version) == HEADER_VERSION))
 | 
			
		||||
	return 100;
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int parallels_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                          Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    int i;
 | 
			
		||||
    struct parallels_header ph;
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    bs->read_only = 1; // no write support yet
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, 0, &ph, sizeof(ph));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (memcmp(ph.magic, HEADER_MAGIC, 16) ||
 | 
			
		||||
        (le32_to_cpu(ph.version) != HEADER_VERSION)) {
 | 
			
		||||
        error_setg(errp, "Image not in Parallels format");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    bs->total_sectors = le32_to_cpu(ph.nb_sectors);
 | 
			
		||||
 | 
			
		||||
    s->tracks = le32_to_cpu(ph.tracks);
 | 
			
		||||
    if (s->tracks == 0) {
 | 
			
		||||
        error_setg(errp, "Invalid image: Zero sectors per track");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->catalog_size = le32_to_cpu(ph.catalog_entries);
 | 
			
		||||
    if (s->catalog_size > INT_MAX / 4) {
 | 
			
		||||
        error_setg(errp, "Catalog too large");
 | 
			
		||||
        ret = -EFBIG;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    s->catalog_bitmap = g_malloc(s->catalog_size * 4);
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, 64, s->catalog_bitmap, s->catalog_size * 4);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < s->catalog_size; i++)
 | 
			
		||||
	le32_to_cpus(&s->catalog_bitmap[i]);
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_init(&s->lock);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    g_free(s->catalog_bitmap);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t seek_to_sector(BlockDriverState *bs, int64_t sector_num)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    uint32_t index, offset;
 | 
			
		||||
 | 
			
		||||
    index = sector_num / s->tracks;
 | 
			
		||||
    offset = sector_num % s->tracks;
 | 
			
		||||
 | 
			
		||||
    /* not allocated */
 | 
			
		||||
    if ((index > s->catalog_size) || (s->catalog_bitmap[index] == 0))
 | 
			
		||||
	return -1;
 | 
			
		||||
    return (uint64_t)(s->catalog_bitmap[index] + offset) * 512;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int parallels_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                    uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    while (nb_sectors > 0) {
 | 
			
		||||
        int64_t position = seek_to_sector(bs, sector_num);
 | 
			
		||||
        if (position >= 0) {
 | 
			
		||||
            if (bdrv_pread(bs->file, position, buf, 512) != 512)
 | 
			
		||||
                return -1;
 | 
			
		||||
        } else {
 | 
			
		||||
            memset(buf, 0, 512);
 | 
			
		||||
        }
 | 
			
		||||
        nb_sectors--;
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int parallels_co_read(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                          uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    int ret;
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    ret = parallels_read(bs, sector_num, buf, nb_sectors);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void parallels_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVParallelsState *s = bs->opaque;
 | 
			
		||||
    g_free(s->catalog_bitmap);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_parallels = {
 | 
			
		||||
    .format_name	= "parallels",
 | 
			
		||||
    .instance_size	= sizeof(BDRVParallelsState),
 | 
			
		||||
    .bdrv_probe		= parallels_probe,
 | 
			
		||||
    .bdrv_open		= parallels_open,
 | 
			
		||||
    .bdrv_read          = parallels_co_read,
 | 
			
		||||
    .bdrv_close		= parallels_close,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_parallels_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_parallels);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_parallels_init);
 | 
			
		||||
							
								
								
									
										628
									
								
								block/qapi.c
									
									
									
									
									
								
							
							
						
						
									
										628
									
								
								block/qapi.c
									
									
									
									
									
								
							@@ -1,628 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block layer qmp and info dump related functions
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2003-2008 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
 | 
			
		||||
#include "block/qapi.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qmp-commands.h"
 | 
			
		||||
#include "qapi-visit.h"
 | 
			
		||||
#include "qapi/qmp-output-visitor.h"
 | 
			
		||||
#include "qapi/qmp/types.h"
 | 
			
		||||
 | 
			
		||||
BlockDeviceInfo *bdrv_block_device_info(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BlockDeviceInfo *info = g_malloc0(sizeof(*info));
 | 
			
		||||
 | 
			
		||||
    info->file                   = g_strdup(bs->filename);
 | 
			
		||||
    info->ro                     = bs->read_only;
 | 
			
		||||
    info->drv                    = g_strdup(bs->drv->format_name);
 | 
			
		||||
    info->encrypted              = bs->encrypted;
 | 
			
		||||
    info->encryption_key_missing = bdrv_key_required(bs);
 | 
			
		||||
 | 
			
		||||
    if (bs->node_name[0]) {
 | 
			
		||||
        info->has_node_name = true;
 | 
			
		||||
        info->node_name = g_strdup(bs->node_name);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (bs->backing_file[0]) {
 | 
			
		||||
        info->has_backing_file = true;
 | 
			
		||||
        info->backing_file = g_strdup(bs->backing_file);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    info->backing_file_depth = bdrv_get_backing_file_depth(bs);
 | 
			
		||||
    info->detect_zeroes = bs->detect_zeroes;
 | 
			
		||||
 | 
			
		||||
    if (bs->io_limits_enabled) {
 | 
			
		||||
        ThrottleConfig cfg;
 | 
			
		||||
        throttle_get_config(&bs->throttle_state, &cfg);
 | 
			
		||||
        info->bps     = cfg.buckets[THROTTLE_BPS_TOTAL].avg;
 | 
			
		||||
        info->bps_rd  = cfg.buckets[THROTTLE_BPS_READ].avg;
 | 
			
		||||
        info->bps_wr  = cfg.buckets[THROTTLE_BPS_WRITE].avg;
 | 
			
		||||
 | 
			
		||||
        info->iops    = cfg.buckets[THROTTLE_OPS_TOTAL].avg;
 | 
			
		||||
        info->iops_rd = cfg.buckets[THROTTLE_OPS_READ].avg;
 | 
			
		||||
        info->iops_wr = cfg.buckets[THROTTLE_OPS_WRITE].avg;
 | 
			
		||||
 | 
			
		||||
        info->has_bps_max     = cfg.buckets[THROTTLE_BPS_TOTAL].max;
 | 
			
		||||
        info->bps_max         = cfg.buckets[THROTTLE_BPS_TOTAL].max;
 | 
			
		||||
        info->has_bps_rd_max  = cfg.buckets[THROTTLE_BPS_READ].max;
 | 
			
		||||
        info->bps_rd_max      = cfg.buckets[THROTTLE_BPS_READ].max;
 | 
			
		||||
        info->has_bps_wr_max  = cfg.buckets[THROTTLE_BPS_WRITE].max;
 | 
			
		||||
        info->bps_wr_max      = cfg.buckets[THROTTLE_BPS_WRITE].max;
 | 
			
		||||
 | 
			
		||||
        info->has_iops_max    = cfg.buckets[THROTTLE_OPS_TOTAL].max;
 | 
			
		||||
        info->iops_max        = cfg.buckets[THROTTLE_OPS_TOTAL].max;
 | 
			
		||||
        info->has_iops_rd_max = cfg.buckets[THROTTLE_OPS_READ].max;
 | 
			
		||||
        info->iops_rd_max     = cfg.buckets[THROTTLE_OPS_READ].max;
 | 
			
		||||
        info->has_iops_wr_max = cfg.buckets[THROTTLE_OPS_WRITE].max;
 | 
			
		||||
        info->iops_wr_max     = cfg.buckets[THROTTLE_OPS_WRITE].max;
 | 
			
		||||
 | 
			
		||||
        info->has_iops_size = cfg.op_size;
 | 
			
		||||
        info->iops_size = cfg.op_size;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return info;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/*
 | 
			
		||||
 * Returns 0 on success, with *p_list either set to describe snapshot
 | 
			
		||||
 * information, or NULL because there are no snapshots.  Returns -errno on
 | 
			
		||||
 * error, with *p_list untouched.
 | 
			
		||||
 */
 | 
			
		||||
int bdrv_query_snapshot_info_list(BlockDriverState *bs,
 | 
			
		||||
                                  SnapshotInfoList **p_list,
 | 
			
		||||
                                  Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int i, sn_count;
 | 
			
		||||
    QEMUSnapshotInfo *sn_tab = NULL;
 | 
			
		||||
    SnapshotInfoList *info_list, *cur_item = NULL, *head = NULL;
 | 
			
		||||
    SnapshotInfo *info;
 | 
			
		||||
 | 
			
		||||
    sn_count = bdrv_snapshot_list(bs, &sn_tab);
 | 
			
		||||
    if (sn_count < 0) {
 | 
			
		||||
        const char *dev = bdrv_get_device_name(bs);
 | 
			
		||||
        switch (sn_count) {
 | 
			
		||||
        case -ENOMEDIUM:
 | 
			
		||||
            error_setg(errp, "Device '%s' is not inserted", dev);
 | 
			
		||||
            break;
 | 
			
		||||
        case -ENOTSUP:
 | 
			
		||||
            error_setg(errp,
 | 
			
		||||
                       "Device '%s' does not support internal snapshots",
 | 
			
		||||
                       dev);
 | 
			
		||||
            break;
 | 
			
		||||
        default:
 | 
			
		||||
            error_setg_errno(errp, -sn_count,
 | 
			
		||||
                             "Can't list snapshots of device '%s'", dev);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        return sn_count;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for (i = 0; i < sn_count; i++) {
 | 
			
		||||
        info = g_new0(SnapshotInfo, 1);
 | 
			
		||||
        info->id            = g_strdup(sn_tab[i].id_str);
 | 
			
		||||
        info->name          = g_strdup(sn_tab[i].name);
 | 
			
		||||
        info->vm_state_size = sn_tab[i].vm_state_size;
 | 
			
		||||
        info->date_sec      = sn_tab[i].date_sec;
 | 
			
		||||
        info->date_nsec     = sn_tab[i].date_nsec;
 | 
			
		||||
        info->vm_clock_sec  = sn_tab[i].vm_clock_nsec / 1000000000;
 | 
			
		||||
        info->vm_clock_nsec = sn_tab[i].vm_clock_nsec % 1000000000;
 | 
			
		||||
 | 
			
		||||
        info_list = g_new0(SnapshotInfoList, 1);
 | 
			
		||||
        info_list->value = info;
 | 
			
		||||
 | 
			
		||||
        /* XXX: waiting for the qapi to support qemu-queue.h types */
 | 
			
		||||
        if (!cur_item) {
 | 
			
		||||
            head = cur_item = info_list;
 | 
			
		||||
        } else {
 | 
			
		||||
            cur_item->next = info_list;
 | 
			
		||||
            cur_item = info_list;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(sn_tab);
 | 
			
		||||
    *p_list = head;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/**
 | 
			
		||||
 * bdrv_query_image_info:
 | 
			
		||||
 * @bs: block device to examine
 | 
			
		||||
 * @p_info: location to store image information
 | 
			
		||||
 * @errp: location to store error information
 | 
			
		||||
 *
 | 
			
		||||
 * Store "flat" image information in @p_info.
 | 
			
		||||
 *
 | 
			
		||||
 * "Flat" means it does *not* query backing image information,
 | 
			
		||||
 * i.e. (*pinfo)->has_backing_image will be set to false and
 | 
			
		||||
 * (*pinfo)->backing_image to NULL even when the image does in fact have
 | 
			
		||||
 * a backing image.
 | 
			
		||||
 *
 | 
			
		||||
 * @p_info will be set only on success. On error, store error in @errp.
 | 
			
		||||
 */
 | 
			
		||||
void bdrv_query_image_info(BlockDriverState *bs,
 | 
			
		||||
                           ImageInfo **p_info,
 | 
			
		||||
                           Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    uint64_t total_sectors;
 | 
			
		||||
    const char *backing_filename;
 | 
			
		||||
    char backing_filename2[1024];
 | 
			
		||||
    BlockDriverInfo bdi;
 | 
			
		||||
    int ret;
 | 
			
		||||
    Error *err = NULL;
 | 
			
		||||
    ImageInfo *info = g_new0(ImageInfo, 1);
 | 
			
		||||
 | 
			
		||||
    bdrv_get_geometry(bs, &total_sectors);
 | 
			
		||||
 | 
			
		||||
    info->filename        = g_strdup(bs->filename);
 | 
			
		||||
    info->format          = g_strdup(bdrv_get_format_name(bs));
 | 
			
		||||
    info->virtual_size    = total_sectors * 512;
 | 
			
		||||
    info->actual_size     = bdrv_get_allocated_file_size(bs);
 | 
			
		||||
    info->has_actual_size = info->actual_size >= 0;
 | 
			
		||||
    if (bdrv_is_encrypted(bs)) {
 | 
			
		||||
        info->encrypted = true;
 | 
			
		||||
        info->has_encrypted = true;
 | 
			
		||||
    }
 | 
			
		||||
    if (bdrv_get_info(bs, &bdi) >= 0) {
 | 
			
		||||
        if (bdi.cluster_size != 0) {
 | 
			
		||||
            info->cluster_size = bdi.cluster_size;
 | 
			
		||||
            info->has_cluster_size = true;
 | 
			
		||||
        }
 | 
			
		||||
        info->dirty_flag = bdi.is_dirty;
 | 
			
		||||
        info->has_dirty_flag = true;
 | 
			
		||||
    }
 | 
			
		||||
    info->format_specific     = bdrv_get_specific_info(bs);
 | 
			
		||||
    info->has_format_specific = info->format_specific != NULL;
 | 
			
		||||
 | 
			
		||||
    backing_filename = bs->backing_file;
 | 
			
		||||
    if (backing_filename[0] != '\0') {
 | 
			
		||||
        info->backing_filename = g_strdup(backing_filename);
 | 
			
		||||
        info->has_backing_filename = true;
 | 
			
		||||
        bdrv_get_full_backing_filename(bs, backing_filename2,
 | 
			
		||||
                                       sizeof(backing_filename2));
 | 
			
		||||
 | 
			
		||||
        if (strcmp(backing_filename, backing_filename2) != 0) {
 | 
			
		||||
            info->full_backing_filename =
 | 
			
		||||
                        g_strdup(backing_filename2);
 | 
			
		||||
            info->has_full_backing_filename = true;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (bs->backing_format[0]) {
 | 
			
		||||
            info->backing_filename_format = g_strdup(bs->backing_format);
 | 
			
		||||
            info->has_backing_filename_format = true;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_query_snapshot_info_list(bs, &info->snapshots, &err);
 | 
			
		||||
    switch (ret) {
 | 
			
		||||
    case 0:
 | 
			
		||||
        if (info->snapshots) {
 | 
			
		||||
            info->has_snapshots = true;
 | 
			
		||||
        }
 | 
			
		||||
        break;
 | 
			
		||||
    /* recoverable error */
 | 
			
		||||
    case -ENOMEDIUM:
 | 
			
		||||
    case -ENOTSUP:
 | 
			
		||||
        error_free(err);
 | 
			
		||||
        break;
 | 
			
		||||
    default:
 | 
			
		||||
        error_propagate(errp, err);
 | 
			
		||||
        qapi_free_ImageInfo(info);
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *p_info = info;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* @p_info will be set only on success. */
 | 
			
		||||
void bdrv_query_info(BlockDriverState *bs,
 | 
			
		||||
                     BlockInfo **p_info,
 | 
			
		||||
                     Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BlockInfo *info = g_malloc0(sizeof(*info));
 | 
			
		||||
    BlockDriverState *bs0;
 | 
			
		||||
    ImageInfo **p_image_info;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    info->device = g_strdup(bs->device_name);
 | 
			
		||||
    info->type = g_strdup("unknown");
 | 
			
		||||
    info->locked = bdrv_dev_is_medium_locked(bs);
 | 
			
		||||
    info->removable = bdrv_dev_has_removable_media(bs);
 | 
			
		||||
 | 
			
		||||
    if (bdrv_dev_has_removable_media(bs)) {
 | 
			
		||||
        info->has_tray_open = true;
 | 
			
		||||
        info->tray_open = bdrv_dev_is_tray_open(bs);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (bdrv_iostatus_is_enabled(bs)) {
 | 
			
		||||
        info->has_io_status = true;
 | 
			
		||||
        info->io_status = bs->iostatus;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (!QLIST_EMPTY(&bs->dirty_bitmaps)) {
 | 
			
		||||
        info->has_dirty_bitmaps = true;
 | 
			
		||||
        info->dirty_bitmaps = bdrv_query_dirty_bitmaps(bs);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (bs->drv) {
 | 
			
		||||
        info->has_inserted = true;
 | 
			
		||||
        info->inserted = bdrv_block_device_info(bs);
 | 
			
		||||
 | 
			
		||||
        bs0 = bs;
 | 
			
		||||
        p_image_info = &info->inserted->image;
 | 
			
		||||
        while (1) {
 | 
			
		||||
            bdrv_query_image_info(bs0, p_image_info, &local_err);
 | 
			
		||||
            if (local_err) {
 | 
			
		||||
                error_propagate(errp, local_err);
 | 
			
		||||
                goto err;
 | 
			
		||||
            }
 | 
			
		||||
            if (bs0->drv && bs0->backing_hd) {
 | 
			
		||||
                bs0 = bs0->backing_hd;
 | 
			
		||||
                (*p_image_info)->has_backing_image = true;
 | 
			
		||||
                p_image_info = &((*p_image_info)->backing_image);
 | 
			
		||||
            } else {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    *p_info = info;
 | 
			
		||||
    return;
 | 
			
		||||
 | 
			
		||||
 err:
 | 
			
		||||
    qapi_free_BlockInfo(info);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static BlockStats *bdrv_query_stats(const BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BlockStats *s;
 | 
			
		||||
 | 
			
		||||
    s = g_malloc0(sizeof(*s));
 | 
			
		||||
 | 
			
		||||
    if (bs->device_name[0]) {
 | 
			
		||||
        s->has_device = true;
 | 
			
		||||
        s->device = g_strdup(bs->device_name);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->stats = g_malloc0(sizeof(*s->stats));
 | 
			
		||||
    s->stats->rd_bytes = bs->nr_bytes[BDRV_ACCT_READ];
 | 
			
		||||
    s->stats->wr_bytes = bs->nr_bytes[BDRV_ACCT_WRITE];
 | 
			
		||||
    s->stats->rd_operations = bs->nr_ops[BDRV_ACCT_READ];
 | 
			
		||||
    s->stats->wr_operations = bs->nr_ops[BDRV_ACCT_WRITE];
 | 
			
		||||
    s->stats->wr_highest_offset = bs->wr_highest_sector * BDRV_SECTOR_SIZE;
 | 
			
		||||
    s->stats->flush_operations = bs->nr_ops[BDRV_ACCT_FLUSH];
 | 
			
		||||
    s->stats->wr_total_time_ns = bs->total_time_ns[BDRV_ACCT_WRITE];
 | 
			
		||||
    s->stats->rd_total_time_ns = bs->total_time_ns[BDRV_ACCT_READ];
 | 
			
		||||
    s->stats->flush_total_time_ns = bs->total_time_ns[BDRV_ACCT_FLUSH];
 | 
			
		||||
 | 
			
		||||
    if (bs->file) {
 | 
			
		||||
        s->has_parent = true;
 | 
			
		||||
        s->parent = bdrv_query_stats(bs->file);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (bs->backing_hd) {
 | 
			
		||||
        s->has_backing = true;
 | 
			
		||||
        s->backing = bdrv_query_stats(bs->backing_hd);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return s;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockInfoList *qmp_query_block(Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BlockInfoList *head = NULL, **p_next = &head;
 | 
			
		||||
    BlockDriverState *bs = NULL;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
 | 
			
		||||
     while ((bs = bdrv_next(bs))) {
 | 
			
		||||
        BlockInfoList *info = g_malloc0(sizeof(*info));
 | 
			
		||||
        bdrv_query_info(bs, &info->value, &local_err);
 | 
			
		||||
        if (local_err) {
 | 
			
		||||
            error_propagate(errp, local_err);
 | 
			
		||||
            goto err;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        *p_next = info;
 | 
			
		||||
        p_next = &info->next;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return head;
 | 
			
		||||
 | 
			
		||||
 err:
 | 
			
		||||
    qapi_free_BlockInfoList(head);
 | 
			
		||||
    return NULL;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
BlockStatsList *qmp_query_blockstats(Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BlockStatsList *head = NULL, **p_next = &head;
 | 
			
		||||
    BlockDriverState *bs = NULL;
 | 
			
		||||
 | 
			
		||||
     while ((bs = bdrv_next(bs))) {
 | 
			
		||||
        BlockStatsList *info = g_malloc0(sizeof(*info));
 | 
			
		||||
        AioContext *ctx = bdrv_get_aio_context(bs);
 | 
			
		||||
 | 
			
		||||
        aio_context_acquire(ctx);
 | 
			
		||||
        info->value = bdrv_query_stats(bs);
 | 
			
		||||
        aio_context_release(ctx);
 | 
			
		||||
 | 
			
		||||
        *p_next = info;
 | 
			
		||||
        p_next = &info->next;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return head;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#define NB_SUFFIXES 4
 | 
			
		||||
 | 
			
		||||
static 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;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return buf;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void bdrv_snapshot_dump(fprintf_function func_fprintf, void *f,
 | 
			
		||||
                        QEMUSnapshotInfo *sn)
 | 
			
		||||
{
 | 
			
		||||
    char buf1[128], date_buf[128], clock_buf[128];
 | 
			
		||||
    struct tm tm;
 | 
			
		||||
    time_t ti;
 | 
			
		||||
    int64_t secs;
 | 
			
		||||
 | 
			
		||||
    if (!sn) {
 | 
			
		||||
        func_fprintf(f,
 | 
			
		||||
                     "%-10s%-20s%7s%20s%15s",
 | 
			
		||||
                     "ID", "TAG", "VM SIZE", "DATE", "VM CLOCK");
 | 
			
		||||
    } else {
 | 
			
		||||
        ti = sn->date_sec;
 | 
			
		||||
        localtime_r(&ti, &tm);
 | 
			
		||||
        strftime(date_buf, sizeof(date_buf),
 | 
			
		||||
                 "%Y-%m-%d %H:%M:%S", &tm);
 | 
			
		||||
        secs = sn->vm_clock_nsec / 1000000000;
 | 
			
		||||
        snprintf(clock_buf, sizeof(clock_buf),
 | 
			
		||||
                 "%02d:%02d:%02d.%03d",
 | 
			
		||||
                 (int)(secs / 3600),
 | 
			
		||||
                 (int)((secs / 60) % 60),
 | 
			
		||||
                 (int)(secs % 60),
 | 
			
		||||
                 (int)((sn->vm_clock_nsec / 1000000) % 1000));
 | 
			
		||||
        func_fprintf(f,
 | 
			
		||||
                     "%-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);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void dump_qdict(fprintf_function func_fprintf, void *f, int indentation,
 | 
			
		||||
                       QDict *dict);
 | 
			
		||||
static void dump_qlist(fprintf_function func_fprintf, void *f, int indentation,
 | 
			
		||||
                       QList *list);
 | 
			
		||||
 | 
			
		||||
static void dump_qobject(fprintf_function func_fprintf, void *f,
 | 
			
		||||
                         int comp_indent, QObject *obj)
 | 
			
		||||
{
 | 
			
		||||
    switch (qobject_type(obj)) {
 | 
			
		||||
        case QTYPE_QINT: {
 | 
			
		||||
            QInt *value = qobject_to_qint(obj);
 | 
			
		||||
            func_fprintf(f, "%" PRId64, qint_get_int(value));
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_QSTRING: {
 | 
			
		||||
            QString *value = qobject_to_qstring(obj);
 | 
			
		||||
            func_fprintf(f, "%s", qstring_get_str(value));
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_QDICT: {
 | 
			
		||||
            QDict *value = qobject_to_qdict(obj);
 | 
			
		||||
            dump_qdict(func_fprintf, f, comp_indent, value);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_QLIST: {
 | 
			
		||||
            QList *value = qobject_to_qlist(obj);
 | 
			
		||||
            dump_qlist(func_fprintf, f, comp_indent, value);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_QFLOAT: {
 | 
			
		||||
            QFloat *value = qobject_to_qfloat(obj);
 | 
			
		||||
            func_fprintf(f, "%g", qfloat_get_double(value));
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_QBOOL: {
 | 
			
		||||
            QBool *value = qobject_to_qbool(obj);
 | 
			
		||||
            func_fprintf(f, "%s", qbool_get_int(value) ? "true" : "false");
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_QERROR: {
 | 
			
		||||
            QString *value = qerror_human((QError *)obj);
 | 
			
		||||
            func_fprintf(f, "%s", qstring_get_str(value));
 | 
			
		||||
            QDECREF(value);
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        case QTYPE_NONE:
 | 
			
		||||
            break;
 | 
			
		||||
        case QTYPE_MAX:
 | 
			
		||||
        default:
 | 
			
		||||
            abort();
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void dump_qlist(fprintf_function func_fprintf, void *f, int indentation,
 | 
			
		||||
                       QList *list)
 | 
			
		||||
{
 | 
			
		||||
    const QListEntry *entry;
 | 
			
		||||
    int i = 0;
 | 
			
		||||
 | 
			
		||||
    for (entry = qlist_first(list); entry; entry = qlist_next(entry), i++) {
 | 
			
		||||
        qtype_code type = qobject_type(entry->value);
 | 
			
		||||
        bool composite = (type == QTYPE_QDICT || type == QTYPE_QLIST);
 | 
			
		||||
        const char *format = composite ? "%*s[%i]:\n" : "%*s[%i]: ";
 | 
			
		||||
 | 
			
		||||
        func_fprintf(f, format, indentation * 4, "", i);
 | 
			
		||||
        dump_qobject(func_fprintf, f, indentation + 1, entry->value);
 | 
			
		||||
        if (!composite) {
 | 
			
		||||
            func_fprintf(f, "\n");
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void dump_qdict(fprintf_function func_fprintf, void *f, int indentation,
 | 
			
		||||
                       QDict *dict)
 | 
			
		||||
{
 | 
			
		||||
    const QDictEntry *entry;
 | 
			
		||||
 | 
			
		||||
    for (entry = qdict_first(dict); entry; entry = qdict_next(dict, entry)) {
 | 
			
		||||
        qtype_code type = qobject_type(entry->value);
 | 
			
		||||
        bool composite = (type == QTYPE_QDICT || type == QTYPE_QLIST);
 | 
			
		||||
        const char *format = composite ? "%*s%s:\n" : "%*s%s: ";
 | 
			
		||||
        char key[strlen(entry->key) + 1];
 | 
			
		||||
        int i;
 | 
			
		||||
 | 
			
		||||
        /* replace dashes with spaces in key (variable) names */
 | 
			
		||||
        for (i = 0; entry->key[i]; i++) {
 | 
			
		||||
            key[i] = entry->key[i] == '-' ? ' ' : entry->key[i];
 | 
			
		||||
        }
 | 
			
		||||
        key[i] = 0;
 | 
			
		||||
 | 
			
		||||
        func_fprintf(f, format, indentation * 4, "", key);
 | 
			
		||||
        dump_qobject(func_fprintf, f, indentation + 1, entry->value);
 | 
			
		||||
        if (!composite) {
 | 
			
		||||
            func_fprintf(f, "\n");
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void bdrv_image_info_specific_dump(fprintf_function func_fprintf, void *f,
 | 
			
		||||
                                   ImageInfoSpecific *info_spec)
 | 
			
		||||
{
 | 
			
		||||
    QmpOutputVisitor *ov = qmp_output_visitor_new();
 | 
			
		||||
    QObject *obj, *data;
 | 
			
		||||
 | 
			
		||||
    visit_type_ImageInfoSpecific(qmp_output_get_visitor(ov), &info_spec, NULL,
 | 
			
		||||
                                 &error_abort);
 | 
			
		||||
    obj = qmp_output_get_qobject(ov);
 | 
			
		||||
    assert(qobject_type(obj) == QTYPE_QDICT);
 | 
			
		||||
    data = qdict_get(qobject_to_qdict(obj), "data");
 | 
			
		||||
    dump_qobject(func_fprintf, f, 1, data);
 | 
			
		||||
    qmp_output_visitor_cleanup(ov);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
void bdrv_image_info_dump(fprintf_function func_fprintf, void *f,
 | 
			
		||||
                          ImageInfo *info)
 | 
			
		||||
{
 | 
			
		||||
    char size_buf[128], dsize_buf[128];
 | 
			
		||||
    if (!info->has_actual_size) {
 | 
			
		||||
        snprintf(dsize_buf, sizeof(dsize_buf), "unavailable");
 | 
			
		||||
    } else {
 | 
			
		||||
        get_human_readable_size(dsize_buf, sizeof(dsize_buf),
 | 
			
		||||
                                info->actual_size);
 | 
			
		||||
    }
 | 
			
		||||
    get_human_readable_size(size_buf, sizeof(size_buf), info->virtual_size);
 | 
			
		||||
    func_fprintf(f,
 | 
			
		||||
                 "image: %s\n"
 | 
			
		||||
                 "file format: %s\n"
 | 
			
		||||
                 "virtual size: %s (%" PRId64 " bytes)\n"
 | 
			
		||||
                 "disk size: %s\n",
 | 
			
		||||
                 info->filename, info->format, size_buf,
 | 
			
		||||
                 info->virtual_size,
 | 
			
		||||
                 dsize_buf);
 | 
			
		||||
 | 
			
		||||
    if (info->has_encrypted && info->encrypted) {
 | 
			
		||||
        func_fprintf(f, "encrypted: yes\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (info->has_cluster_size) {
 | 
			
		||||
        func_fprintf(f, "cluster_size: %" PRId64 "\n",
 | 
			
		||||
                       info->cluster_size);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (info->has_dirty_flag && info->dirty_flag) {
 | 
			
		||||
        func_fprintf(f, "cleanly shut down: no\n");
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (info->has_backing_filename) {
 | 
			
		||||
        func_fprintf(f, "backing file: %s", info->backing_filename);
 | 
			
		||||
        if (info->has_full_backing_filename) {
 | 
			
		||||
            func_fprintf(f, " (actual path: %s)", info->full_backing_filename);
 | 
			
		||||
        }
 | 
			
		||||
        func_fprintf(f, "\n");
 | 
			
		||||
        if (info->has_backing_filename_format) {
 | 
			
		||||
            func_fprintf(f, "backing file format: %s\n",
 | 
			
		||||
                         info->backing_filename_format);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (info->has_snapshots) {
 | 
			
		||||
        SnapshotInfoList *elem;
 | 
			
		||||
 | 
			
		||||
        func_fprintf(f, "Snapshot list:\n");
 | 
			
		||||
        bdrv_snapshot_dump(func_fprintf, f, NULL);
 | 
			
		||||
        func_fprintf(f, "\n");
 | 
			
		||||
 | 
			
		||||
        /* Ideally bdrv_snapshot_dump() would operate on SnapshotInfoList but
 | 
			
		||||
         * we convert to the block layer's native QEMUSnapshotInfo for now.
 | 
			
		||||
         */
 | 
			
		||||
        for (elem = info->snapshots; elem; elem = elem->next) {
 | 
			
		||||
            QEMUSnapshotInfo sn = {
 | 
			
		||||
                .vm_state_size = elem->value->vm_state_size,
 | 
			
		||||
                .date_sec = elem->value->date_sec,
 | 
			
		||||
                .date_nsec = elem->value->date_nsec,
 | 
			
		||||
                .vm_clock_nsec = elem->value->vm_clock_sec * 1000000000ULL +
 | 
			
		||||
                                 elem->value->vm_clock_nsec,
 | 
			
		||||
            };
 | 
			
		||||
 | 
			
		||||
            pstrcpy(sn.id_str, sizeof(sn.id_str), elem->value->id);
 | 
			
		||||
            pstrcpy(sn.name, sizeof(sn.name), elem->value->name);
 | 
			
		||||
            bdrv_snapshot_dump(func_fprintf, f, &sn);
 | 
			
		||||
            func_fprintf(f, "\n");
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (info->has_format_specific) {
 | 
			
		||||
        func_fprintf(f, "Format specific information:\n");
 | 
			
		||||
        bdrv_image_info_specific_dump(func_fprintf, f, info->format_specific);
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										963
									
								
								block/qcow.c
									
									
									
									
									
								
							
							
						
						
									
										963
									
								
								block/qcow.c
									
									
									
									
									
								
							@@ -1,963 +0,0 @@
 | 
			
		||||
/*
 | 
			
		||||
 * Block driver for the QCOW format
 | 
			
		||||
 *
 | 
			
		||||
 * Copyright (c) 2004-2006 Fabrice Bellard
 | 
			
		||||
 *
 | 
			
		||||
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
			
		||||
 * of this software and associated documentation files (the "Software"), to deal
 | 
			
		||||
 * in the Software without restriction, including without limitation the rights
 | 
			
		||||
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
			
		||||
 * copies of the Software, and to permit persons to whom the Software is
 | 
			
		||||
 * furnished to do so, subject to the following conditions:
 | 
			
		||||
 *
 | 
			
		||||
 * The above copyright notice and this permission notice shall be included in
 | 
			
		||||
 * all copies or substantial portions of the Software.
 | 
			
		||||
 *
 | 
			
		||||
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
			
		||||
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
			
		||||
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
			
		||||
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
			
		||||
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
			
		||||
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
			
		||||
 * THE SOFTWARE.
 | 
			
		||||
 */
 | 
			
		||||
#include "qemu-common.h"
 | 
			
		||||
#include "block/block_int.h"
 | 
			
		||||
#include "qemu/module.h"
 | 
			
		||||
#include <zlib.h>
 | 
			
		||||
#include "qemu/aes.h"
 | 
			
		||||
#include "migration/migration.h"
 | 
			
		||||
 | 
			
		||||
/**************************************************************/
 | 
			
		||||
/* QEMU COW block driver with compression and encryption support */
 | 
			
		||||
 | 
			
		||||
#define QCOW_MAGIC (('Q' << 24) | ('F' << 16) | ('I' << 8) | 0xfb)
 | 
			
		||||
#define QCOW_VERSION 1
 | 
			
		||||
 | 
			
		||||
#define QCOW_CRYPT_NONE 0
 | 
			
		||||
#define QCOW_CRYPT_AES  1
 | 
			
		||||
 | 
			
		||||
#define QCOW_OFLAG_COMPRESSED (1LL << 63)
 | 
			
		||||
 | 
			
		||||
typedef struct QCowHeader {
 | 
			
		||||
    uint32_t magic;
 | 
			
		||||
    uint32_t version;
 | 
			
		||||
    uint64_t backing_file_offset;
 | 
			
		||||
    uint32_t backing_file_size;
 | 
			
		||||
    uint32_t mtime;
 | 
			
		||||
    uint64_t size; /* in bytes */
 | 
			
		||||
    uint8_t cluster_bits;
 | 
			
		||||
    uint8_t l2_bits;
 | 
			
		||||
    uint16_t padding;
 | 
			
		||||
    uint32_t crypt_method;
 | 
			
		||||
    uint64_t l1_table_offset;
 | 
			
		||||
} QEMU_PACKED QCowHeader;
 | 
			
		||||
 | 
			
		||||
#define L2_CACHE_SIZE 16
 | 
			
		||||
 | 
			
		||||
typedef struct BDRVQcowState {
 | 
			
		||||
    int cluster_bits;
 | 
			
		||||
    int cluster_size;
 | 
			
		||||
    int cluster_sectors;
 | 
			
		||||
    int l2_bits;
 | 
			
		||||
    int l2_size;
 | 
			
		||||
    unsigned int l1_size;
 | 
			
		||||
    uint64_t cluster_offset_mask;
 | 
			
		||||
    uint64_t l1_table_offset;
 | 
			
		||||
    uint64_t *l1_table;
 | 
			
		||||
    uint64_t *l2_cache;
 | 
			
		||||
    uint64_t l2_cache_offsets[L2_CACHE_SIZE];
 | 
			
		||||
    uint32_t l2_cache_counts[L2_CACHE_SIZE];
 | 
			
		||||
    uint8_t *cluster_cache;
 | 
			
		||||
    uint8_t *cluster_data;
 | 
			
		||||
    uint64_t cluster_cache_offset;
 | 
			
		||||
    uint32_t crypt_method; /* current crypt method, 0 if no key yet */
 | 
			
		||||
    uint32_t crypt_method_header;
 | 
			
		||||
    AES_KEY aes_encrypt_key;
 | 
			
		||||
    AES_KEY aes_decrypt_key;
 | 
			
		||||
    CoMutex lock;
 | 
			
		||||
    Error *migration_blocker;
 | 
			
		||||
} BDRVQcowState;
 | 
			
		||||
 | 
			
		||||
static int decompress_cluster(BlockDriverState *bs, uint64_t cluster_offset);
 | 
			
		||||
 | 
			
		||||
static int qcow_probe(const uint8_t *buf, int buf_size, const char *filename)
 | 
			
		||||
{
 | 
			
		||||
    const QCowHeader *cow_header = (const void *)buf;
 | 
			
		||||
 | 
			
		||||
    if (buf_size >= sizeof(QCowHeader) &&
 | 
			
		||||
        be32_to_cpu(cow_header->magic) == QCOW_MAGIC &&
 | 
			
		||||
        be32_to_cpu(cow_header->version) == QCOW_VERSION)
 | 
			
		||||
        return 100;
 | 
			
		||||
    else
 | 
			
		||||
        return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_open(BlockDriverState *bs, QDict *options, int flags,
 | 
			
		||||
                     Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    unsigned int len, i, shift;
 | 
			
		||||
    int ret;
 | 
			
		||||
    QCowHeader header;
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, 0, &header, sizeof(header));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    be32_to_cpus(&header.magic);
 | 
			
		||||
    be32_to_cpus(&header.version);
 | 
			
		||||
    be64_to_cpus(&header.backing_file_offset);
 | 
			
		||||
    be32_to_cpus(&header.backing_file_size);
 | 
			
		||||
    be32_to_cpus(&header.mtime);
 | 
			
		||||
    be64_to_cpus(&header.size);
 | 
			
		||||
    be32_to_cpus(&header.crypt_method);
 | 
			
		||||
    be64_to_cpus(&header.l1_table_offset);
 | 
			
		||||
 | 
			
		||||
    if (header.magic != QCOW_MAGIC) {
 | 
			
		||||
        error_setg(errp, "Image not in qcow format");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    if (header.version != QCOW_VERSION) {
 | 
			
		||||
        char version[64];
 | 
			
		||||
        snprintf(version, sizeof(version), "QCOW version %" PRIu32,
 | 
			
		||||
                 header.version);
 | 
			
		||||
        error_set(errp, QERR_UNKNOWN_BLOCK_FORMAT_FEATURE,
 | 
			
		||||
                  bs->device_name, "qcow", version);
 | 
			
		||||
        ret = -ENOTSUP;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (header.size <= 1) {
 | 
			
		||||
        error_setg(errp, "Image size is too small (must be at least 2 bytes)");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    if (header.cluster_bits < 9 || header.cluster_bits > 16) {
 | 
			
		||||
        error_setg(errp, "Cluster size must be between 512 and 64k");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* l2_bits specifies number of entries; storing a uint64_t in each entry,
 | 
			
		||||
     * so bytes = num_entries << 3. */
 | 
			
		||||
    if (header.l2_bits < 9 - 3 || header.l2_bits > 16 - 3) {
 | 
			
		||||
        error_setg(errp, "L2 table size must be between 512 and 64k");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (header.crypt_method > QCOW_CRYPT_AES) {
 | 
			
		||||
        error_setg(errp, "invalid encryption method in qcow header");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    s->crypt_method_header = header.crypt_method;
 | 
			
		||||
    if (s->crypt_method_header) {
 | 
			
		||||
        bs->encrypted = 1;
 | 
			
		||||
    }
 | 
			
		||||
    s->cluster_bits = header.cluster_bits;
 | 
			
		||||
    s->cluster_size = 1 << s->cluster_bits;
 | 
			
		||||
    s->cluster_sectors = 1 << (s->cluster_bits - 9);
 | 
			
		||||
    s->l2_bits = header.l2_bits;
 | 
			
		||||
    s->l2_size = 1 << s->l2_bits;
 | 
			
		||||
    bs->total_sectors = header.size / 512;
 | 
			
		||||
    s->cluster_offset_mask = (1LL << (63 - s->cluster_bits)) - 1;
 | 
			
		||||
 | 
			
		||||
    /* read the level 1 table */
 | 
			
		||||
    shift = s->cluster_bits + s->l2_bits;
 | 
			
		||||
    if (header.size > UINT64_MAX - (1LL << shift)) {
 | 
			
		||||
        error_setg(errp, "Image too large");
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    } else {
 | 
			
		||||
        uint64_t l1_size = (header.size + (1LL << shift) - 1) >> shift;
 | 
			
		||||
        if (l1_size > INT_MAX / sizeof(uint64_t)) {
 | 
			
		||||
            error_setg(errp, "Image too large");
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        s->l1_size = l1_size;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    s->l1_table_offset = header.l1_table_offset;
 | 
			
		||||
    s->l1_table = g_malloc(s->l1_size * sizeof(uint64_t));
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_pread(bs->file, s->l1_table_offset, s->l1_table,
 | 
			
		||||
               s->l1_size * sizeof(uint64_t));
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    for(i = 0;i < s->l1_size; i++) {
 | 
			
		||||
        be64_to_cpus(&s->l1_table[i]);
 | 
			
		||||
    }
 | 
			
		||||
    /* alloc L2 cache */
 | 
			
		||||
    s->l2_cache = g_malloc(s->l2_size * L2_CACHE_SIZE * sizeof(uint64_t));
 | 
			
		||||
    s->cluster_cache = g_malloc(s->cluster_size);
 | 
			
		||||
    s->cluster_data = g_malloc(s->cluster_size);
 | 
			
		||||
    s->cluster_cache_offset = -1;
 | 
			
		||||
 | 
			
		||||
    /* read the backing file name */
 | 
			
		||||
    if (header.backing_file_offset != 0) {
 | 
			
		||||
        len = header.backing_file_size;
 | 
			
		||||
        if (len > 1023) {
 | 
			
		||||
            error_setg(errp, "Backing file name too long");
 | 
			
		||||
            ret = -EINVAL;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        ret = bdrv_pread(bs->file, header.backing_file_offset,
 | 
			
		||||
                   bs->backing_file, len);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
        bs->backing_file[len] = '\0';
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* Disable migration when qcow images are used */
 | 
			
		||||
    error_set(&s->migration_blocker,
 | 
			
		||||
              QERR_BLOCK_FORMAT_FEATURE_NOT_SUPPORTED,
 | 
			
		||||
              "qcow", bs->device_name, "live migration");
 | 
			
		||||
    migrate_add_blocker(s->migration_blocker);
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_init(&s->lock);
 | 
			
		||||
    return 0;
 | 
			
		||||
 | 
			
		||||
 fail:
 | 
			
		||||
    g_free(s->l1_table);
 | 
			
		||||
    g_free(s->l2_cache);
 | 
			
		||||
    g_free(s->cluster_cache);
 | 
			
		||||
    g_free(s->cluster_data);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
/* We have nothing to do for QCOW reopen, stubs just return
 | 
			
		||||
 * success */
 | 
			
		||||
static int qcow_reopen_prepare(BDRVReopenState *state,
 | 
			
		||||
                               BlockReopenQueue *queue, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_set_key(BlockDriverState *bs, const char *key)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    uint8_t keybuf[16];
 | 
			
		||||
    int len, i;
 | 
			
		||||
 | 
			
		||||
    memset(keybuf, 0, 16);
 | 
			
		||||
    len = strlen(key);
 | 
			
		||||
    if (len > 16)
 | 
			
		||||
        len = 16;
 | 
			
		||||
    /* XXX: we could compress the chars to 7 bits to increase
 | 
			
		||||
       entropy */
 | 
			
		||||
    for(i = 0;i < len;i++) {
 | 
			
		||||
        keybuf[i] = key[i];
 | 
			
		||||
    }
 | 
			
		||||
    s->crypt_method = s->crypt_method_header;
 | 
			
		||||
 | 
			
		||||
    if (AES_set_encrypt_key(keybuf, 128, &s->aes_encrypt_key) != 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    if (AES_set_decrypt_key(keybuf, 128, &s->aes_decrypt_key) != 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* The crypt function is compatible with the linux cryptoloop
 | 
			
		||||
   algorithm for < 4 GB images. NOTE: out_buf == in_buf is
 | 
			
		||||
   supported */
 | 
			
		||||
static void encrypt_sectors(BDRVQcowState *s, int64_t sector_num,
 | 
			
		||||
                            uint8_t *out_buf, const uint8_t *in_buf,
 | 
			
		||||
                            int nb_sectors, int enc,
 | 
			
		||||
                            const AES_KEY *key)
 | 
			
		||||
{
 | 
			
		||||
    union {
 | 
			
		||||
        uint64_t ll[2];
 | 
			
		||||
        uint8_t b[16];
 | 
			
		||||
    } ivec;
 | 
			
		||||
    int i;
 | 
			
		||||
 | 
			
		||||
    for(i = 0; i < nb_sectors; i++) {
 | 
			
		||||
        ivec.ll[0] = cpu_to_le64(sector_num);
 | 
			
		||||
        ivec.ll[1] = 0;
 | 
			
		||||
        AES_cbc_encrypt(in_buf, out_buf, 512, key,
 | 
			
		||||
                        ivec.b, enc);
 | 
			
		||||
        sector_num++;
 | 
			
		||||
        in_buf += 512;
 | 
			
		||||
        out_buf += 512;
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* 'allocate' is:
 | 
			
		||||
 *
 | 
			
		||||
 * 0 to not allocate.
 | 
			
		||||
 *
 | 
			
		||||
 * 1 to allocate a normal cluster (for sector indexes 'n_start' to
 | 
			
		||||
 * 'n_end')
 | 
			
		||||
 *
 | 
			
		||||
 * 2 to allocate a compressed cluster of size
 | 
			
		||||
 * 'compressed_size'. 'compressed_size' must be > 0 and <
 | 
			
		||||
 * cluster_size
 | 
			
		||||
 *
 | 
			
		||||
 * return 0 if not allocated.
 | 
			
		||||
 */
 | 
			
		||||
static uint64_t get_cluster_offset(BlockDriverState *bs,
 | 
			
		||||
                                   uint64_t offset, int allocate,
 | 
			
		||||
                                   int compressed_size,
 | 
			
		||||
                                   int n_start, int n_end)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int min_index, i, j, l1_index, l2_index;
 | 
			
		||||
    uint64_t l2_offset, *l2_table, cluster_offset, tmp;
 | 
			
		||||
    uint32_t min_count;
 | 
			
		||||
    int new_l2_table;
 | 
			
		||||
 | 
			
		||||
    l1_index = offset >> (s->l2_bits + s->cluster_bits);
 | 
			
		||||
    l2_offset = s->l1_table[l1_index];
 | 
			
		||||
    new_l2_table = 0;
 | 
			
		||||
    if (!l2_offset) {
 | 
			
		||||
        if (!allocate)
 | 
			
		||||
            return 0;
 | 
			
		||||
        /* allocate a new l2 entry */
 | 
			
		||||
        l2_offset = bdrv_getlength(bs->file);
 | 
			
		||||
        /* round to cluster size */
 | 
			
		||||
        l2_offset = (l2_offset + s->cluster_size - 1) & ~(s->cluster_size - 1);
 | 
			
		||||
        /* update the L1 entry */
 | 
			
		||||
        s->l1_table[l1_index] = l2_offset;
 | 
			
		||||
        tmp = cpu_to_be64(l2_offset);
 | 
			
		||||
        if (bdrv_pwrite_sync(bs->file,
 | 
			
		||||
                s->l1_table_offset + l1_index * sizeof(tmp),
 | 
			
		||||
                &tmp, sizeof(tmp)) < 0)
 | 
			
		||||
            return 0;
 | 
			
		||||
        new_l2_table = 1;
 | 
			
		||||
    }
 | 
			
		||||
    for(i = 0; i < L2_CACHE_SIZE; i++) {
 | 
			
		||||
        if (l2_offset == s->l2_cache_offsets[i]) {
 | 
			
		||||
            /* increment the hit count */
 | 
			
		||||
            if (++s->l2_cache_counts[i] == 0xffffffff) {
 | 
			
		||||
                for(j = 0; j < L2_CACHE_SIZE; j++) {
 | 
			
		||||
                    s->l2_cache_counts[j] >>= 1;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
            l2_table = s->l2_cache + (i << s->l2_bits);
 | 
			
		||||
            goto found;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    /* not found: load a new entry in the least used one */
 | 
			
		||||
    min_index = 0;
 | 
			
		||||
    min_count = 0xffffffff;
 | 
			
		||||
    for(i = 0; i < L2_CACHE_SIZE; i++) {
 | 
			
		||||
        if (s->l2_cache_counts[i] < min_count) {
 | 
			
		||||
            min_count = s->l2_cache_counts[i];
 | 
			
		||||
            min_index = i;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    l2_table = s->l2_cache + (min_index << s->l2_bits);
 | 
			
		||||
    if (new_l2_table) {
 | 
			
		||||
        memset(l2_table, 0, s->l2_size * sizeof(uint64_t));
 | 
			
		||||
        if (bdrv_pwrite_sync(bs->file, l2_offset, l2_table,
 | 
			
		||||
                s->l2_size * sizeof(uint64_t)) < 0)
 | 
			
		||||
            return 0;
 | 
			
		||||
    } else {
 | 
			
		||||
        if (bdrv_pread(bs->file, l2_offset, l2_table, s->l2_size * sizeof(uint64_t)) !=
 | 
			
		||||
            s->l2_size * sizeof(uint64_t))
 | 
			
		||||
            return 0;
 | 
			
		||||
    }
 | 
			
		||||
    s->l2_cache_offsets[min_index] = l2_offset;
 | 
			
		||||
    s->l2_cache_counts[min_index] = 1;
 | 
			
		||||
 found:
 | 
			
		||||
    l2_index = (offset >> s->cluster_bits) & (s->l2_size - 1);
 | 
			
		||||
    cluster_offset = be64_to_cpu(l2_table[l2_index]);
 | 
			
		||||
    if (!cluster_offset ||
 | 
			
		||||
        ((cluster_offset & QCOW_OFLAG_COMPRESSED) && allocate == 1)) {
 | 
			
		||||
        if (!allocate)
 | 
			
		||||
            return 0;
 | 
			
		||||
        /* allocate a new cluster */
 | 
			
		||||
        if ((cluster_offset & QCOW_OFLAG_COMPRESSED) &&
 | 
			
		||||
            (n_end - n_start) < s->cluster_sectors) {
 | 
			
		||||
            /* if the cluster is already compressed, we must
 | 
			
		||||
               decompress it in the case it is not completely
 | 
			
		||||
               overwritten */
 | 
			
		||||
            if (decompress_cluster(bs, cluster_offset) < 0)
 | 
			
		||||
                return 0;
 | 
			
		||||
            cluster_offset = bdrv_getlength(bs->file);
 | 
			
		||||
            cluster_offset = (cluster_offset + s->cluster_size - 1) &
 | 
			
		||||
                ~(s->cluster_size - 1);
 | 
			
		||||
            /* write the cluster content */
 | 
			
		||||
            if (bdrv_pwrite(bs->file, cluster_offset, s->cluster_cache, s->cluster_size) !=
 | 
			
		||||
                s->cluster_size)
 | 
			
		||||
                return -1;
 | 
			
		||||
        } else {
 | 
			
		||||
            cluster_offset = bdrv_getlength(bs->file);
 | 
			
		||||
            if (allocate == 1) {
 | 
			
		||||
                /* round to cluster size */
 | 
			
		||||
                cluster_offset = (cluster_offset + s->cluster_size - 1) &
 | 
			
		||||
                    ~(s->cluster_size - 1);
 | 
			
		||||
                bdrv_truncate(bs->file, cluster_offset + s->cluster_size);
 | 
			
		||||
                /* if encrypted, we must initialize the cluster
 | 
			
		||||
                   content which won't be written */
 | 
			
		||||
                if (s->crypt_method &&
 | 
			
		||||
                    (n_end - n_start) < s->cluster_sectors) {
 | 
			
		||||
                    uint64_t start_sect;
 | 
			
		||||
                    start_sect = (offset & ~(s->cluster_size - 1)) >> 9;
 | 
			
		||||
                    memset(s->cluster_data + 512, 0x00, 512);
 | 
			
		||||
                    for(i = 0; i < s->cluster_sectors; i++) {
 | 
			
		||||
                        if (i < n_start || i >= n_end) {
 | 
			
		||||
                            encrypt_sectors(s, start_sect + i,
 | 
			
		||||
                                            s->cluster_data,
 | 
			
		||||
                                            s->cluster_data + 512, 1, 1,
 | 
			
		||||
                                            &s->aes_encrypt_key);
 | 
			
		||||
                            if (bdrv_pwrite(bs->file, cluster_offset + i * 512,
 | 
			
		||||
                                            s->cluster_data, 512) != 512)
 | 
			
		||||
                                return -1;
 | 
			
		||||
                        }
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
            } else if (allocate == 2) {
 | 
			
		||||
                cluster_offset |= QCOW_OFLAG_COMPRESSED |
 | 
			
		||||
                    (uint64_t)compressed_size << (63 - s->cluster_bits);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        /* update L2 table */
 | 
			
		||||
        tmp = cpu_to_be64(cluster_offset);
 | 
			
		||||
        l2_table[l2_index] = tmp;
 | 
			
		||||
        if (bdrv_pwrite_sync(bs->file, l2_offset + l2_index * sizeof(tmp),
 | 
			
		||||
                &tmp, sizeof(tmp)) < 0)
 | 
			
		||||
            return 0;
 | 
			
		||||
    }
 | 
			
		||||
    return cluster_offset;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int64_t coroutine_fn qcow_co_get_block_status(BlockDriverState *bs,
 | 
			
		||||
        int64_t sector_num, int nb_sectors, int *pnum)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
    cluster_offset = get_cluster_offset(bs, sector_num << 9, 0, 0, 0, 0);
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
    index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
    n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
    if (n > nb_sectors)
 | 
			
		||||
        n = nb_sectors;
 | 
			
		||||
    *pnum = n;
 | 
			
		||||
    if (!cluster_offset) {
 | 
			
		||||
        return 0;
 | 
			
		||||
    }
 | 
			
		||||
    if ((cluster_offset & QCOW_OFLAG_COMPRESSED) || s->crypt_method) {
 | 
			
		||||
        return BDRV_BLOCK_DATA;
 | 
			
		||||
    }
 | 
			
		||||
    cluster_offset |= (index_in_cluster << BDRV_SECTOR_BITS);
 | 
			
		||||
    return BDRV_BLOCK_DATA | BDRV_BLOCK_OFFSET_VALID | cluster_offset;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int decompress_buffer(uint8_t *out_buf, int out_buf_size,
 | 
			
		||||
                             const uint8_t *buf, int buf_size)
 | 
			
		||||
{
 | 
			
		||||
    z_stream strm1, *strm = &strm1;
 | 
			
		||||
    int ret, out_len;
 | 
			
		||||
 | 
			
		||||
    memset(strm, 0, sizeof(*strm));
 | 
			
		||||
 | 
			
		||||
    strm->next_in = (uint8_t *)buf;
 | 
			
		||||
    strm->avail_in = buf_size;
 | 
			
		||||
    strm->next_out = out_buf;
 | 
			
		||||
    strm->avail_out = out_buf_size;
 | 
			
		||||
 | 
			
		||||
    ret = inflateInit2(strm, -12);
 | 
			
		||||
    if (ret != Z_OK)
 | 
			
		||||
        return -1;
 | 
			
		||||
    ret = inflate(strm, Z_FINISH);
 | 
			
		||||
    out_len = strm->next_out - out_buf;
 | 
			
		||||
    if ((ret != Z_STREAM_END && ret != Z_BUF_ERROR) ||
 | 
			
		||||
        out_len != out_buf_size) {
 | 
			
		||||
        inflateEnd(strm);
 | 
			
		||||
        return -1;
 | 
			
		||||
    }
 | 
			
		||||
    inflateEnd(strm);
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int decompress_cluster(BlockDriverState *bs, uint64_t cluster_offset)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int ret, csize;
 | 
			
		||||
    uint64_t coffset;
 | 
			
		||||
 | 
			
		||||
    coffset = cluster_offset & s->cluster_offset_mask;
 | 
			
		||||
    if (s->cluster_cache_offset != coffset) {
 | 
			
		||||
        csize = cluster_offset >> (63 - s->cluster_bits);
 | 
			
		||||
        csize &= (s->cluster_size - 1);
 | 
			
		||||
        ret = bdrv_pread(bs->file, coffset, s->cluster_data, csize);
 | 
			
		||||
        if (ret != csize)
 | 
			
		||||
            return -1;
 | 
			
		||||
        if (decompress_buffer(s->cluster_cache, s->cluster_size,
 | 
			
		||||
                              s->cluster_data, csize) < 0) {
 | 
			
		||||
            return -1;
 | 
			
		||||
        }
 | 
			
		||||
        s->cluster_cache_offset = coffset;
 | 
			
		||||
    }
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int qcow_co_readv(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                         int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster;
 | 
			
		||||
    int ret = 0, n;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
    struct iovec hd_iov;
 | 
			
		||||
    QEMUIOVector hd_qiov;
 | 
			
		||||
    uint8_t *buf;
 | 
			
		||||
    void *orig_buf;
 | 
			
		||||
 | 
			
		||||
    if (qiov->niov > 1) {
 | 
			
		||||
        buf = orig_buf = qemu_blockalign(bs, qiov->size);
 | 
			
		||||
    } else {
 | 
			
		||||
        orig_buf = NULL;
 | 
			
		||||
        buf = (uint8_t *)qiov->iov->iov_base;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors != 0) {
 | 
			
		||||
        /* prepare next request */
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, sector_num << 9,
 | 
			
		||||
                                                 0, 0, 0, 0);
 | 
			
		||||
        index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
        n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
        if (n > nb_sectors) {
 | 
			
		||||
            n = nb_sectors;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        if (!cluster_offset) {
 | 
			
		||||
            if (bs->backing_hd) {
 | 
			
		||||
                /* read from the base image */
 | 
			
		||||
                hd_iov.iov_base = (void *)buf;
 | 
			
		||||
                hd_iov.iov_len = n * 512;
 | 
			
		||||
                qemu_iovec_init_external(&hd_qiov, &hd_iov, 1);
 | 
			
		||||
                qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
                ret = bdrv_co_readv(bs->backing_hd, sector_num,
 | 
			
		||||
                                    n, &hd_qiov);
 | 
			
		||||
                qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
                if (ret < 0) {
 | 
			
		||||
                    goto fail;
 | 
			
		||||
                }
 | 
			
		||||
            } else {
 | 
			
		||||
                /* Note: in this case, no need to wait */
 | 
			
		||||
                memset(buf, 0, 512 * n);
 | 
			
		||||
            }
 | 
			
		||||
        } else if (cluster_offset & QCOW_OFLAG_COMPRESSED) {
 | 
			
		||||
            /* add AIO support for compressed blocks ? */
 | 
			
		||||
            if (decompress_cluster(bs, cluster_offset) < 0) {
 | 
			
		||||
                goto fail;
 | 
			
		||||
            }
 | 
			
		||||
            memcpy(buf,
 | 
			
		||||
                   s->cluster_cache + index_in_cluster * 512, 512 * n);
 | 
			
		||||
        } else {
 | 
			
		||||
            if ((cluster_offset & 511) != 0) {
 | 
			
		||||
                goto fail;
 | 
			
		||||
            }
 | 
			
		||||
            hd_iov.iov_base = (void *)buf;
 | 
			
		||||
            hd_iov.iov_len = n * 512;
 | 
			
		||||
            qemu_iovec_init_external(&hd_qiov, &hd_iov, 1);
 | 
			
		||||
            qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
            ret = bdrv_co_readv(bs->file,
 | 
			
		||||
                                (cluster_offset >> 9) + index_in_cluster,
 | 
			
		||||
                                n, &hd_qiov);
 | 
			
		||||
            qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
            if (ret < 0) {
 | 
			
		||||
                break;
 | 
			
		||||
            }
 | 
			
		||||
            if (s->crypt_method) {
 | 
			
		||||
                encrypt_sectors(s, sector_num, buf, buf,
 | 
			
		||||
                                n, 0,
 | 
			
		||||
                                &s->aes_decrypt_key);
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
        ret = 0;
 | 
			
		||||
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
done:
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
 | 
			
		||||
    if (qiov->niov > 1) {
 | 
			
		||||
        qemu_iovec_from_buf(qiov, 0, orig_buf, qiov->size);
 | 
			
		||||
        qemu_vfree(orig_buf);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
 | 
			
		||||
fail:
 | 
			
		||||
    ret = -EIO;
 | 
			
		||||
    goto done;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static coroutine_fn int qcow_co_writev(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                          int nb_sectors, QEMUIOVector *qiov)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    int index_in_cluster;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
    const uint8_t *src_buf;
 | 
			
		||||
    int ret = 0, n;
 | 
			
		||||
    uint8_t *cluster_data = NULL;
 | 
			
		||||
    struct iovec hd_iov;
 | 
			
		||||
    QEMUIOVector hd_qiov;
 | 
			
		||||
    uint8_t *buf;
 | 
			
		||||
    void *orig_buf;
 | 
			
		||||
 | 
			
		||||
    s->cluster_cache_offset = -1; /* disable compressed cache */
 | 
			
		||||
 | 
			
		||||
    if (qiov->niov > 1) {
 | 
			
		||||
        buf = orig_buf = qemu_blockalign(bs, qiov->size);
 | 
			
		||||
        qemu_iovec_to_buf(qiov, 0, buf, qiov->size);
 | 
			
		||||
    } else {
 | 
			
		||||
        orig_buf = NULL;
 | 
			
		||||
        buf = (uint8_t *)qiov->iov->iov_base;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
 | 
			
		||||
    while (nb_sectors != 0) {
 | 
			
		||||
 | 
			
		||||
        index_in_cluster = sector_num & (s->cluster_sectors - 1);
 | 
			
		||||
        n = s->cluster_sectors - index_in_cluster;
 | 
			
		||||
        if (n > nb_sectors) {
 | 
			
		||||
            n = nb_sectors;
 | 
			
		||||
        }
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, sector_num << 9, 1, 0,
 | 
			
		||||
                                            index_in_cluster,
 | 
			
		||||
                                            index_in_cluster + n);
 | 
			
		||||
        if (!cluster_offset || (cluster_offset & 511) != 0) {
 | 
			
		||||
            ret = -EIO;
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        if (s->crypt_method) {
 | 
			
		||||
            if (!cluster_data) {
 | 
			
		||||
                cluster_data = g_malloc0(s->cluster_size);
 | 
			
		||||
            }
 | 
			
		||||
            encrypt_sectors(s, sector_num, cluster_data, buf,
 | 
			
		||||
                            n, 1, &s->aes_encrypt_key);
 | 
			
		||||
            src_buf = cluster_data;
 | 
			
		||||
        } else {
 | 
			
		||||
            src_buf = buf;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        hd_iov.iov_base = (void *)src_buf;
 | 
			
		||||
        hd_iov.iov_len = n * 512;
 | 
			
		||||
        qemu_iovec_init_external(&hd_qiov, &hd_iov, 1);
 | 
			
		||||
        qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
        ret = bdrv_co_writev(bs->file,
 | 
			
		||||
                             (cluster_offset >> 9) + index_in_cluster,
 | 
			
		||||
                             n, &hd_qiov);
 | 
			
		||||
        qemu_co_mutex_lock(&s->lock);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            break;
 | 
			
		||||
        }
 | 
			
		||||
        ret = 0;
 | 
			
		||||
 | 
			
		||||
        nb_sectors -= n;
 | 
			
		||||
        sector_num += n;
 | 
			
		||||
        buf += n * 512;
 | 
			
		||||
    }
 | 
			
		||||
    qemu_co_mutex_unlock(&s->lock);
 | 
			
		||||
 | 
			
		||||
    if (qiov->niov > 1) {
 | 
			
		||||
        qemu_vfree(orig_buf);
 | 
			
		||||
    }
 | 
			
		||||
    g_free(cluster_data);
 | 
			
		||||
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static void qcow_close(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
 | 
			
		||||
    g_free(s->l1_table);
 | 
			
		||||
    g_free(s->l2_cache);
 | 
			
		||||
    g_free(s->cluster_cache);
 | 
			
		||||
    g_free(s->cluster_data);
 | 
			
		||||
 | 
			
		||||
    migrate_del_blocker(s->migration_blocker);
 | 
			
		||||
    error_free(s->migration_blocker);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_create(const char *filename, QemuOpts *opts, Error **errp)
 | 
			
		||||
{
 | 
			
		||||
    int header_size, backing_filename_len, l1_size, shift, i;
 | 
			
		||||
    QCowHeader header;
 | 
			
		||||
    uint8_t *tmp;
 | 
			
		||||
    int64_t total_size = 0;
 | 
			
		||||
    char *backing_file = NULL;
 | 
			
		||||
    int flags = 0;
 | 
			
		||||
    Error *local_err = NULL;
 | 
			
		||||
    int ret;
 | 
			
		||||
    BlockDriverState *qcow_bs;
 | 
			
		||||
 | 
			
		||||
    /* Read out options */
 | 
			
		||||
    total_size = qemu_opt_get_size_del(opts, BLOCK_OPT_SIZE, 0) / 512;
 | 
			
		||||
    backing_file = qemu_opt_get_del(opts, BLOCK_OPT_BACKING_FILE);
 | 
			
		||||
    if (qemu_opt_get_bool_del(opts, BLOCK_OPT_ENCRYPT, false)) {
 | 
			
		||||
        flags |= BLOCK_FLAG_ENCRYPT;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_create_file(filename, opts, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto cleanup;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    qcow_bs = NULL;
 | 
			
		||||
    ret = bdrv_open(&qcow_bs, filename, NULL, NULL,
 | 
			
		||||
                    BDRV_O_RDWR | BDRV_O_PROTOCOL, NULL, &local_err);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        error_propagate(errp, local_err);
 | 
			
		||||
        goto cleanup;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = bdrv_truncate(qcow_bs, 0);
 | 
			
		||||
    if (ret < 0) {
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    memset(&header, 0, sizeof(header));
 | 
			
		||||
    header.magic = cpu_to_be32(QCOW_MAGIC);
 | 
			
		||||
    header.version = cpu_to_be32(QCOW_VERSION);
 | 
			
		||||
    header.size = cpu_to_be64(total_size * 512);
 | 
			
		||||
    header_size = sizeof(header);
 | 
			
		||||
    backing_filename_len = 0;
 | 
			
		||||
    if (backing_file) {
 | 
			
		||||
        if (strcmp(backing_file, "fat:")) {
 | 
			
		||||
            header.backing_file_offset = cpu_to_be64(header_size);
 | 
			
		||||
            backing_filename_len = strlen(backing_file);
 | 
			
		||||
            header.backing_file_size = cpu_to_be32(backing_filename_len);
 | 
			
		||||
            header_size += backing_filename_len;
 | 
			
		||||
        } else {
 | 
			
		||||
            /* special backing file for vvfat */
 | 
			
		||||
            backing_file = NULL;
 | 
			
		||||
        }
 | 
			
		||||
        header.cluster_bits = 9; /* 512 byte cluster to avoid copying
 | 
			
		||||
                                    unmodified sectors */
 | 
			
		||||
        header.l2_bits = 12; /* 32 KB L2 tables */
 | 
			
		||||
    } else {
 | 
			
		||||
        header.cluster_bits = 12; /* 4 KB clusters */
 | 
			
		||||
        header.l2_bits = 9; /* 4 KB L2 tables */
 | 
			
		||||
    }
 | 
			
		||||
    header_size = (header_size + 7) & ~7;
 | 
			
		||||
    shift = header.cluster_bits + header.l2_bits;
 | 
			
		||||
    l1_size = ((total_size * 512) + (1LL << shift) - 1) >> shift;
 | 
			
		||||
 | 
			
		||||
    header.l1_table_offset = cpu_to_be64(header_size);
 | 
			
		||||
    if (flags & BLOCK_FLAG_ENCRYPT) {
 | 
			
		||||
        header.crypt_method = cpu_to_be32(QCOW_CRYPT_AES);
 | 
			
		||||
    } else {
 | 
			
		||||
        header.crypt_method = cpu_to_be32(QCOW_CRYPT_NONE);
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    /* write all the data */
 | 
			
		||||
    ret = bdrv_pwrite(qcow_bs, 0, &header, sizeof(header));
 | 
			
		||||
    if (ret != sizeof(header)) {
 | 
			
		||||
        goto exit;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if (backing_file) {
 | 
			
		||||
        ret = bdrv_pwrite(qcow_bs, sizeof(header),
 | 
			
		||||
            backing_file, backing_filename_len);
 | 
			
		||||
        if (ret != backing_filename_len) {
 | 
			
		||||
            goto exit;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    tmp = g_malloc0(BDRV_SECTOR_SIZE);
 | 
			
		||||
    for (i = 0; i < ((sizeof(uint64_t)*l1_size + BDRV_SECTOR_SIZE - 1)/
 | 
			
		||||
        BDRV_SECTOR_SIZE); i++) {
 | 
			
		||||
        ret = bdrv_pwrite(qcow_bs, header_size +
 | 
			
		||||
            BDRV_SECTOR_SIZE*i, tmp, BDRV_SECTOR_SIZE);
 | 
			
		||||
        if (ret != BDRV_SECTOR_SIZE) {
 | 
			
		||||
            g_free(tmp);
 | 
			
		||||
            goto exit;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    g_free(tmp);
 | 
			
		||||
    ret = 0;
 | 
			
		||||
exit:
 | 
			
		||||
    bdrv_unref(qcow_bs);
 | 
			
		||||
cleanup:
 | 
			
		||||
    g_free(backing_file);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_make_empty(BlockDriverState *bs)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    uint32_t l1_length = s->l1_size * sizeof(uint64_t);
 | 
			
		||||
    int ret;
 | 
			
		||||
 | 
			
		||||
    memset(s->l1_table, 0, l1_length);
 | 
			
		||||
    if (bdrv_pwrite_sync(bs->file, s->l1_table_offset, s->l1_table,
 | 
			
		||||
            l1_length) < 0)
 | 
			
		||||
        return -1;
 | 
			
		||||
    ret = bdrv_truncate(bs->file, s->l1_table_offset + l1_length);
 | 
			
		||||
    if (ret < 0)
 | 
			
		||||
        return ret;
 | 
			
		||||
 | 
			
		||||
    memset(s->l2_cache, 0, s->l2_size * L2_CACHE_SIZE * sizeof(uint64_t));
 | 
			
		||||
    memset(s->l2_cache_offsets, 0, L2_CACHE_SIZE * sizeof(uint64_t));
 | 
			
		||||
    memset(s->l2_cache_counts, 0, L2_CACHE_SIZE * sizeof(uint32_t));
 | 
			
		||||
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
/* XXX: put compressed sectors first, then all the cluster aligned
 | 
			
		||||
   tables to avoid losing bytes in alignment */
 | 
			
		||||
static int qcow_write_compressed(BlockDriverState *bs, int64_t sector_num,
 | 
			
		||||
                                 const uint8_t *buf, int nb_sectors)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    z_stream strm;
 | 
			
		||||
    int ret, out_len;
 | 
			
		||||
    uint8_t *out_buf;
 | 
			
		||||
    uint64_t cluster_offset;
 | 
			
		||||
 | 
			
		||||
    if (nb_sectors != s->cluster_sectors) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
 | 
			
		||||
        /* Zero-pad last write if image size is not cluster aligned */
 | 
			
		||||
        if (sector_num + nb_sectors == bs->total_sectors &&
 | 
			
		||||
            nb_sectors < s->cluster_sectors) {
 | 
			
		||||
            uint8_t *pad_buf = qemu_blockalign(bs, s->cluster_size);
 | 
			
		||||
            memset(pad_buf, 0, s->cluster_size);
 | 
			
		||||
            memcpy(pad_buf, buf, nb_sectors * BDRV_SECTOR_SIZE);
 | 
			
		||||
            ret = qcow_write_compressed(bs, sector_num,
 | 
			
		||||
                                        pad_buf, s->cluster_sectors);
 | 
			
		||||
            qemu_vfree(pad_buf);
 | 
			
		||||
        }
 | 
			
		||||
        return ret;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    out_buf = g_malloc(s->cluster_size + (s->cluster_size / 1000) + 128);
 | 
			
		||||
 | 
			
		||||
    /* best compression, small window, no zlib header */
 | 
			
		||||
    memset(&strm, 0, sizeof(strm));
 | 
			
		||||
    ret = deflateInit2(&strm, Z_DEFAULT_COMPRESSION,
 | 
			
		||||
                       Z_DEFLATED, -12,
 | 
			
		||||
                       9, Z_DEFAULT_STRATEGY);
 | 
			
		||||
    if (ret != 0) {
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    strm.avail_in = s->cluster_size;
 | 
			
		||||
    strm.next_in = (uint8_t *)buf;
 | 
			
		||||
    strm.avail_out = s->cluster_size;
 | 
			
		||||
    strm.next_out = out_buf;
 | 
			
		||||
 | 
			
		||||
    ret = deflate(&strm, Z_FINISH);
 | 
			
		||||
    if (ret != Z_STREAM_END && ret != Z_OK) {
 | 
			
		||||
        deflateEnd(&strm);
 | 
			
		||||
        ret = -EINVAL;
 | 
			
		||||
        goto fail;
 | 
			
		||||
    }
 | 
			
		||||
    out_len = strm.next_out - out_buf;
 | 
			
		||||
 | 
			
		||||
    deflateEnd(&strm);
 | 
			
		||||
 | 
			
		||||
    if (ret != Z_STREAM_END || out_len >= s->cluster_size) {
 | 
			
		||||
        /* could not compress: write normal cluster */
 | 
			
		||||
        ret = bdrv_write(bs, sector_num, buf, s->cluster_sectors);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    } else {
 | 
			
		||||
        cluster_offset = get_cluster_offset(bs, sector_num << 9, 2,
 | 
			
		||||
                                            out_len, 0, 0);
 | 
			
		||||
        if (cluster_offset == 0) {
 | 
			
		||||
            ret = -EIO;
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        cluster_offset &= s->cluster_offset_mask;
 | 
			
		||||
        ret = bdrv_pwrite(bs->file, cluster_offset, out_buf, out_len);
 | 
			
		||||
        if (ret < 0) {
 | 
			
		||||
            goto fail;
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    ret = 0;
 | 
			
		||||
fail:
 | 
			
		||||
    g_free(out_buf);
 | 
			
		||||
    return ret;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static int qcow_get_info(BlockDriverState *bs, BlockDriverInfo *bdi)
 | 
			
		||||
{
 | 
			
		||||
    BDRVQcowState *s = bs->opaque;
 | 
			
		||||
    bdi->cluster_size = s->cluster_size;
 | 
			
		||||
    return 0;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
static QemuOptsList qcow_create_opts = {
 | 
			
		||||
    .name = "qcow-create-opts",
 | 
			
		||||
    .head = QTAILQ_HEAD_INITIALIZER(qcow_create_opts.head),
 | 
			
		||||
    .desc = {
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_SIZE,
 | 
			
		||||
            .type = QEMU_OPT_SIZE,
 | 
			
		||||
            .help = "Virtual disk size"
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_BACKING_FILE,
 | 
			
		||||
            .type = QEMU_OPT_STRING,
 | 
			
		||||
            .help = "File name of a base image"
 | 
			
		||||
        },
 | 
			
		||||
        {
 | 
			
		||||
            .name = BLOCK_OPT_ENCRYPT,
 | 
			
		||||
            .type = QEMU_OPT_BOOL,
 | 
			
		||||
            .help = "Encrypt the image",
 | 
			
		||||
            .def_value_str = "off"
 | 
			
		||||
        },
 | 
			
		||||
        { /* end of list */ }
 | 
			
		||||
    }
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static BlockDriver bdrv_qcow = {
 | 
			
		||||
    .format_name	= "qcow",
 | 
			
		||||
    .instance_size	= sizeof(BDRVQcowState),
 | 
			
		||||
    .bdrv_probe		= qcow_probe,
 | 
			
		||||
    .bdrv_open		= qcow_open,
 | 
			
		||||
    .bdrv_close		= qcow_close,
 | 
			
		||||
    .bdrv_reopen_prepare    = qcow_reopen_prepare,
 | 
			
		||||
    .bdrv_create            = qcow_create,
 | 
			
		||||
    .bdrv_has_zero_init     = bdrv_has_zero_init_1,
 | 
			
		||||
    .supports_backing       = true,
 | 
			
		||||
 | 
			
		||||
    .bdrv_co_readv          = qcow_co_readv,
 | 
			
		||||
    .bdrv_co_writev         = qcow_co_writev,
 | 
			
		||||
    .bdrv_co_get_block_status   = qcow_co_get_block_status,
 | 
			
		||||
 | 
			
		||||
    .bdrv_set_key           = qcow_set_key,
 | 
			
		||||
    .bdrv_make_empty        = qcow_make_empty,
 | 
			
		||||
    .bdrv_write_compressed  = qcow_write_compressed,
 | 
			
		||||
    .bdrv_get_info          = qcow_get_info,
 | 
			
		||||
 | 
			
		||||
    .create_opts            = &qcow_create_opts,
 | 
			
		||||
};
 | 
			
		||||
 | 
			
		||||
static void bdrv_qcow_init(void)
 | 
			
		||||
{
 | 
			
		||||
    bdrv_register(&bdrv_qcow);
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
block_init(bdrv_qcow_init);
 | 
			
		||||
Some files were not shown because too many files have changed in this diff Show More
		Reference in New Issue
	
	Block a user