# # USB HID test # # Test connect and disconnect assert_spec x86 if {[have_spec linux]} { puts "Run script does not support Linux." exit 0 } if {[get_cmd_switch --autopilot] && [have_include "power_on/qemu"]} { puts "Run script does not support autopilot mode on Qemu." exit 0 } if {[get_cmd_switch --autopilot] && ![have_spec x86_64]} { puts "Run script does not support autopilot mode on this platform." exit 0 } # # Build # set build_components { core init timer drivers/usb_host drivers/usb_hid server/event_dump server/dynamic_rom } source ${genode_dir}/repos/base/run/platform_drv.inc append_platform_drv_build_components build $build_components create_boot_directory # # Generate config # append config { } append_platform_drv_config append config { } install_config $config # # Boot modules # # generic modules set boot_modules { core ld.lib.so init timer event_dump dynamic_rom usb_hid_drv } append boot_modules [usb_host_drv_binary] append_platform_drv_boot_modules build_boot_image $boot_modules append qemu_args " -device nec-usb-xhci,id=xhci -device usb-kbd,bus=xhci.0 -nographic" # autopilot test #run_genode_until forever # wait for keyboard run_genode_until {.*USB HID.*Keyboard.*} 60 set spawn_id $qemu_spawn_id # send Ctrl-a+c to enter Qemu's monitor mode send "\x01\x63" # wait for monitor to become ready run_genode_until {(qemu)} 20 $spawn_id for {set i 0} {$i < 50} {incr i} { # connect keyboard send "device_add usb-kbd,id=ukb1\n" # wait for keyboard run_genode_until {.*USB HID.*Keyboard.*\n} 20 $spawn_id # disconnect keyboard send "device_del ukb1\n" # wait for disconnect run_genode_until {.*USB disconnect.*\n} 20 $spawn_id }