# # \brief Test for using the libc_vfs plugin with a file system server # \author Christian Prochaska # \date 2017-06-13 # set use_sd_card_drv [expr [have_spec pbxa9]] set use_ahci_drv [expr [have_spec x86] && ![have_spec linux]] set use_ram_block [have_spec linux] set mkfs [installed_command $mkfs_cmd] if {[expr ![have_spec pbxa9] && ![have_spec x86]]} { puts "Run script does not support this platform"; exit } # # Build # set build_components { core init timer test/libc_vfs } lappend build_components $build_component lappend_if $use_ahci_drv build_components drivers/ahci lappend_if $use_sd_card_drv build_components drivers/sd_card lappend_if $use_ram_block build_components server/ram_block source ${genode_dir}/repos/base/run/platform_drv.inc append_platform_drv_build_components build $build_components create_boot_directory # # Generate config # set config { } append config " " append config { } append config " $vfs_dev_blkdev" append config { } append_platform_drv_config append_if $use_ahci_drv config { } append_if $use_sd_card_drv config { } append_if $use_ram_block config { } append config { } install_config $config # # Boot modules # # generic modules set boot_modules { core init timer ld.lib.so libc.lib.so vfs.lib.so libm.lib.so posix.lib.so test-libc_vfs } lappend boot_modules $binary lappend_if $use_ahci_drv boot_modules ahci_drv lappend_if $use_sd_card_drv boot_modules pbxa9_sd_card_drv lappend_if $use_ram_block boot_modules ram_block lappend_if $use_ram_block boot_modules test.hda append_platform_drv_boot_modules build_boot_image $boot_modules # # Execute test case # set disk_image "bin/test.hda" set cmd "dd if=/dev/zero of=$disk_image bs=1024 count=65536" puts "creating disk image: $cmd" catch { exec sh -c $cmd } set cmd "$mkfs $mkfs_opts $disk_image" puts "formating disk image: $cmd" catch { exec sh -c $cmd } # # Qemu # append qemu_args " -nographic " append_if $use_ahci_drv qemu_args " -drive id=disk,file=$disk_image,format=raw,if=none -device ahci,id=ahci -device ide-drive,drive=disk,bus=ahci.0 -boot d" append_if $use_sd_card_drv qemu_args " -drive file=$disk_image,format=raw,if=sd,cache=writeback " run_genode_until {.*child "test-libc_vfs" exited with exit value 0.*} 120 exec rm -f $disk_image puts "\nTest succeeded\n" # vi: set ft=tcl :