set use_sd_card_drv [expr [have_spec pbxa9]] set use_ahci_drv [expr [have_spec x86] && ![have_spec linux]] set use_vfs_block [have_spec linux] if {[expr ![have_include "power_on/qemu"] && !$use_vfs_block]} { puts "\nPlease setup your native sd or hard drive. Remove this fail stop"; puts "check when you have prepared your native environment.\n"; exit 0 } # # Build # set build_components { core init timer test/libc_block } lappend_if $use_ahci_drv build_components drivers/ahci lappend_if $use_sd_card_drv build_components drivers/sd_card lappend_if $use_vfs_block build_components server/vfs_block lappend_if $use_vfs_block build_components lib/vfs/import 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_platform_drv_config append_if $use_ahci_drv config { } append_if $use_sd_card_drv config { } append_if $use_vfs_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_block } lappend_if $use_ahci_drv boot_modules ahci_drv lappend_if $use_sd_card_drv boot_modules pbxa9_sd_card_drv lappend_if $use_vfs_block boot_modules vfs_block lappend_if $use_vfs_block boot_modules vfs_import.lib.so 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 } # # 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_block" exited with exit value 0.*} 60 exec rm -f $disk_image puts "\nTest succeeded\n" # vi: set ft=tcl :