mirror of
https://github.com/genodelabs/genode.git
synced 2024-12-26 17:01:07 +00:00
329 lines
9.0 KiB
Plaintext
329 lines
9.0 KiB
Plaintext
#
|
||
# This script is used to test the shared folder support of Vbox@Genode/NOVA.
|
||
#
|
||
# Requirements to run this script:
|
||
# - hard disk with 4 primary partitions
|
||
# - on the 4. partition an ext2 filesystem is expected with following files:
|
||
# -- /win7.vdi
|
||
# -- /ram/overlay-original.vdi
|
||
#
|
||
# The overlay file must be generated beforehand, e.g.:
|
||
#
|
||
# vboxmanage showhdinfo win7.vdi
|
||
#
|
||
# to find out the size of the vdi and then to create the overlay:
|
||
#
|
||
# vboxmanage createhd --filename overlay-original.vdi --size [vdi_size] --format vdi
|
||
#
|
||
#
|
||
#
|
||
#
|
||
# The Windows image (win7.vdi) is prepared to contain a bat file with following
|
||
# content:
|
||
#
|
||
# :check
|
||
# IF EXIST E:\test.bat (GOTO start) ELSE (timeout /t 3 >nul)
|
||
# GOTO check
|
||
#
|
||
# :start
|
||
#
|
||
# call E:\test.bat
|
||
#
|
||
# This file must be configured to be autostarted by Windows, e.g change the
|
||
# value in the registry entry at
|
||
#
|
||
# HKEY_CURRENT_USER\Software/Microsoft\Windows\CurrentVersion\Run
|
||
#
|
||
# to the batch file in the Windows vdi image as described above.
|
||
#
|
||
#
|
||
# What this script does:
|
||
#
|
||
# A VM containing a Win7 image is started configured with two different
|
||
# Virtualbox fileshares (D: and E:). One contains a test file (test.bin),
|
||
# which will be copied by the Windows VM from the one file share over to the
|
||
# second one.
|
||
# On Genode side a Noux instance is running a bash shell with the two
|
||
# filesystems mounted. The shell is scripted by this script to wait for
|
||
# completion of the copy operation performed by the Windows VM. If this is
|
||
# detected, the bash scripts use sha1sum to generate hashes of the original
|
||
# test file of the one file system share and of the copy on the second file
|
||
# system share. This run scripts then compares the hashes and reports
|
||
# "Test succeeded" if they are identical.
|
||
#
|
||
# This script generates the test file out of /dev/urandom and generates a
|
||
# batch file test.bat which is placed in the shared folder for the VM. test.bat
|
||
# is invoked by the batch file running already in the Windows VM as described
|
||
# beforehand. test.bat contains the actual instructions to be performed by
|
||
# the VM - for this script to copy the test.bin file from D: to E:.
|
||
|
||
|
||
if {[is_qemu_available]} {
|
||
puts "\nRun script does not support Qemu.\n"
|
||
exit
|
||
}
|
||
|
||
# Tested for nova.
|
||
assert_spec nova
|
||
|
||
#
|
||
# Build Noux packages only once
|
||
#
|
||
foreach pkg {bash coreutils} {
|
||
lappend_if [expr ![file exists bin/$pkg]] build_components noux-pkg/$pkg }
|
||
|
||
#
|
||
# Create .bat file to be executed by Win VM
|
||
#
|
||
set template_bat_fd [open "bin/template.bat" w]
|
||
puts $template_bat_fd {:check
|
||
IF EXIST E:\start.txt (GOTO start) ELSE (timeout /t 3 >nul)
|
||
GOTO check
|
||
|
||
:start
|
||
|
||
copy D:\test.bin E:\test.bin
|
||
copy D:\template.bat E:\done.txt
|
||
shutdown /s /t 00}
|
||
|
||
close $template_bat_fd
|
||
|
||
# Convert bat file to dos format
|
||
catch { exec unix2dos bin/template.bat }
|
||
|
||
#
|
||
# Create random test binary to be copied via shared folder of vbox
|
||
#
|
||
catch { exec dd if=/dev/urandom of=bin/test.bin bs=4096 count=8160 }
|
||
|
||
|
||
#
|
||
# Step 0: prepare overlay.vdi for a clean run of the VM
|
||
#
|
||
set config_of_app {
|
||
<start name="vbox-auto-test-helper" priority="-1">
|
||
<resource name="RAM" quantum="10M"/>
|
||
<route>
|
||
<service name="File_system"> <child name="rump_fs"/> </service>
|
||
<any-service> <parent/> <any-child /> </any-service>
|
||
</route>
|
||
<config>
|
||
<libc stdout="/dev/log" stderr="/dev/log">
|
||
<vfs>
|
||
<fs />
|
||
<dir name="dev"> <log/> </dir>
|
||
</vfs>
|
||
</libc>
|
||
</config>
|
||
</start>
|
||
}
|
||
|
||
source ${genode_dir}/repos/ports/run/virtualbox_auto.inc
|
||
|
||
run_genode_until "vbox_auto_test_helper is done." 20
|
||
exec kill [exp_pid −i $spawn_id]
|
||
|
||
|
||
|
||
#
|
||
# Step 1: prepare and start the actual VM
|
||
#
|
||
exec tar cfv bin/bash.tar -h -C bin/bash .
|
||
exec tar cfv bin/coreutils.tar -h -C bin/coreutils .
|
||
|
||
set build_components {
|
||
server/ram_fs
|
||
server/tcp_terminal drivers/nic
|
||
noux/minimal
|
||
}
|
||
|
||
set boot_modules {
|
||
ram_fs
|
||
noux libc_noux.lib.so bash.tar coreutils.tar
|
||
tcp_terminal lwip.lib.so nic_drv
|
||
test.bin template.bat
|
||
}
|
||
|
||
set config_of_app {
|
||
<start name="nic_drv" priority="-1">
|
||
<resource name="RAM" quantum="4M"/>
|
||
<provides> <service name="Nic"/> </provides>
|
||
<route>
|
||
<service name="IRQ"><child name="acpi" /></service>
|
||
<any-service> <parent /> <any-child /></any-service>
|
||
</route>
|
||
</start>
|
||
|
||
<start name="tcp_terminal" priority="-1">
|
||
<resource name="RAM" quantum="5M"/>
|
||
<provides> <service name="Terminal"/> </provides>
|
||
<config>
|
||
<policy label="noux" port="8888"/>
|
||
</config>
|
||
</start>
|
||
|
||
<start name="noux" priority="-1">
|
||
<resource name="RAM" quantum="32M" />
|
||
<config>
|
||
<fstab>
|
||
<tar name="coreutils.tar" />
|
||
<tar name="bash.tar" />
|
||
|
||
<dir name="from"> <fs label="share_from" /> </dir>
|
||
<dir name="to"> <fs label="share_to" /> </dir>
|
||
</fstab>
|
||
<start name="/bin/bash">
|
||
<env name="TERM" value="linux" />
|
||
</start>
|
||
</config>
|
||
<route>
|
||
<service name="File_system">
|
||
<if-arg key="label" value="share_from" />
|
||
<child name="ram_fs_from"/>
|
||
</service>
|
||
<service name="File_system">
|
||
<if-arg key="label" value="share_to" />
|
||
<child name="ram_fs_to"/>
|
||
</service>
|
||
<any-service> <parent/> <any-child /> </any-service>
|
||
</route>
|
||
</start>
|
||
|
||
<start name="ram_fs_from" priority="-1">
|
||
<binary name="ram_fs" />
|
||
<resource name="RAM" quantum="64M"/>
|
||
<provides><service name="File_system"/></provides>
|
||
<config>
|
||
<content>
|
||
<rom name="test.bin" />
|
||
<rom name="template.bat" />
|
||
</content>
|
||
<policy label="" root="/" writeable="no" />
|
||
</config>
|
||
</start>
|
||
|
||
<start name="ram_fs_to" priority="-1">
|
||
<binary name="ram_fs" />
|
||
<resource name="RAM" quantum="64M"/>
|
||
<provides><service name="File_system"/></provides>
|
||
<config>
|
||
<policy label="" root="/" writeable="yes" />
|
||
</config>
|
||
</start>
|
||
|
||
<start name="vbox" priority="-2">
|
||
<binary name="virtualbox" />
|
||
<resource name="RAM" quantum="1536M"/>
|
||
<config>
|
||
<share host="/from" guest="from" />
|
||
<share host="/to" guest="to" />
|
||
<image type="vdi" file="win7.vdi" overlay="yes"/>
|
||
<libc stdout="/dev/log" stderr="/dev/log">
|
||
<vfs>
|
||
<dir name="dev"> <log/> </dir>
|
||
<dir name="from"> <fs label="share_ram_fs_from"/> </dir>
|
||
<dir name="to"> <fs label="share_ram_fs_to"/> </dir>
|
||
<fs />
|
||
</vfs>
|
||
</libc>
|
||
</config>
|
||
<route>
|
||
<service name="File_system">
|
||
<if-arg key="label" value="share_ram_fs_from" />
|
||
<child name="ram_fs_from"/>
|
||
</service>
|
||
<service name="File_system">
|
||
<if-arg key="label" value="share_ram_fs_to" />
|
||
<child name="ram_fs_to"/>
|
||
</service>
|
||
<service name="File_system"> <child name="rump_fs"/> </service>
|
||
<any-service> <parent/> <any-child /> </any-service>
|
||
</route>
|
||
</start>
|
||
}
|
||
|
||
source ${genode_dir}/repos/ports/run/virtualbox_auto.inc
|
||
|
||
#
|
||
# Step 2: Read out TCP/IP address of tcp_terminal running on Genode target
|
||
#
|
||
run_genode_until {\[init -> tcp_terminal\] listening on port 8888\.\.\.} 20
|
||
set serial_id $spawn_id
|
||
|
||
regexp {\[init -> tcp_terminal\] .{1,5}got IP address [0-9]+\.[0-9]+\.[0-9]+\.[0-9]+} $output serial_ip_addr
|
||
regexp {[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+} $serial_ip_addr serial_ip_addr
|
||
|
||
#
|
||
# Step 3: Wait until Windows is up for sure
|
||
#
|
||
run_genode_until {\[init -\> vbox\].*Guest Additions capability report:.*seamless: yes, hostWindowMapping: no, graphics: yes} 300 $serial_id
|
||
|
||
|
||
#
|
||
# Step 4 : connect to Noux of the running Genode target and issue bash commands
|
||
# via netcat
|
||
#
|
||
puts "\nTest shared folder\n"
|
||
|
||
spawn netcat $serial_ip_addr 8888
|
||
set noux_id $spawn_id
|
||
|
||
run_genode_until {\[init -> tcp_terminal\] connection established} 20 $serial_id
|
||
|
||
#
|
||
# Step 5 : interact with netcat -> ... -> tcp_terminal -> Noux -> bash
|
||
#
|
||
|
||
# Windows does not like trailing zeros introduced by our ROM service.
|
||
# -> .bat script does not find labels like 'check' with zero bytes
|
||
# so - delete zero bytes
|
||
puts $noux_id "cat from/template\.bat | tr -d \"\\0\" >to/test\.bat"
|
||
|
||
# SHA1 of original file
|
||
puts $noux_id "sha1sum from/test.bin"
|
||
|
||
# Tell Windows VM to start copying
|
||
puts $noux_id "echo \"start\" > to/start\.txt"
|
||
|
||
# Wait until Windows finished copying
|
||
puts $noux_id "while \[ ! -f to/done\.txt ]"
|
||
puts $noux_id "do"
|
||
puts $noux_id "sleep 5"
|
||
puts $noux_id "done"
|
||
|
||
# Wait until VM signaled shutdown state
|
||
run_genode_until {\[init -\> vbox\].*Changing the VM state from 'POWERING_OFF' to 'OFF'} 120 $serial_id
|
||
|
||
# SHA1 of copied file
|
||
puts $noux_id "sha1sum to/test.bin"
|
||
|
||
# Wait for output of bash shell until last SHA1 sum is calculated
|
||
run_genode_until {[[:xdigit:]]+ to/test\.bin} 50 $noux_id
|
||
|
||
|
||
# cleanup created files
|
||
foreach pkg {bash coreutils} { exec rm -f bin/$pkg.tar }
|
||
exec rm -f bin/test.bin
|
||
exec rm -f bin/template.bat
|
||
|
||
|
||
#
|
||
# Step 5: Compare sha1sum of original file and of copy made by .bat file in VM
|
||
#
|
||
set sha1sum_original [regexp -inline {[[:xdigit:]]+ from/test\.bin} $output]
|
||
set sha1sum_copy [regexp -inline {[[:xdigit:]]+ to/test\.bin} $output]
|
||
set sha1sum_original [regexp -inline {[[:xdigit:]]+} $sha1sum_original]
|
||
set sha1sum_copy [regexp -inline {[[:xdigit:]]+} $sha1sum_copy]
|
||
|
||
puts -nonewline "\n$sha1sum_original ?= $sha1sum_copy --> "
|
||
if {$sha1sum_original eq ""} {
|
||
puts " empty -> no "
|
||
} else {
|
||
if {$sha1sum_original != $sha1sum_copy} {
|
||
puts "no"
|
||
} else {
|
||
puts "yes"
|
||
puts "\nTest succeeded"
|
||
}
|
||
}
|